LeStagiaire
Messages postés1Date d'inscriptionlundi 2 juillet 2012StatutMembreDernière intervention 2 juillet 2012
-
2 juil. 2012 à 16:05
Bonjour,
Je suis débutant en macro et langage VBA et je souhaiterais créer une macro me permettant d'enregistrer sous pdf mon fichier excel dans un dossier précis. Je m'explique...
Voici la structure de mon dossier que j'ai nommé Pack études v2.0 :
0_Notice
1_Dossier DCE
.
.
.
10_Vente (qui contient les 2 sous-dossiers suivants)
.DPGF Vente
.Pièces à joindre
11_Supports excels (qui contient entre autres le fichier excel suivant)
.9_Frais_de_chantier v2.0
Je souhaiterai donc réaliser une macro dans mon fichier 9_Frais de_chantier v2.0 qui m'enregistre une version PDF de celui-ci dans le dossier Pièces à joindre
De plus, comme ce travail sera ensuite réutilisé par plusieurs personnes du service, il faut que cette macro soit aussi fonctionelle sur leur PC (d'où l'utilisation du chemin relatif si j'ai bien compris).
Voilà le code (qui je me doute doit être bourré de fautes) que j'ai commencé à taper pour essayer d'avoir cette copie en excel (je ne sais pas comment faire pour le PDF).
Sub Macro3()
Dim NomSousDossier
NomSousDossier=ActiveWorkbook.Path
Dim Chemin
Chemin=NomSousDossier & "\10_Vente\pièces à joindre\test"
MonFichier=Chemin & ".xls"
ActiveWorkbook.SaveAs Filename=MonFichier
End Sub
Si j'ai bien compris ma macro ne "remonte" pas assez loin (elle s'arrête au niveau du dossier "11_Supoorts excels" et ne peut donc trouver le chemin que je lui indique.
J'espère avoir été suffisament clair et vous remercie par avance de l'aide que vous pourriez m'apporter pour résoudre ce problème.