Résolu XL 2019 Sauvegarder une feuille en PDF dans un sous dossier du classeur

Bana XIII

XLDnaute Nouveau
Bonjour la communauté,

J'ai besoin d'aide sur une macro. Bon voici ma démarche:

Mon Classeur se trouve dans un dossier que j'ai nommé MONPROJET; dans ce dossier j'ai un sous dossier nommé EXPORTS dans lequel se trouve un autre sous dossier nommé FACTURE.
Je souhaite pouvoir enregistrer mes facture sous PDF dans le sous-dossier FACTURE en utilisant la syntaxe THISWORKBOOK.PATH.

J'ai essayé la macro suivante:

Private sub Bouton1_Click()
Dim Dossier as string

Dossier=ThisWorkbook.Path \ EXPORTS & FACTURE & ".PDF"

Feuille.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Dossier, Quality:=xlQualityStandard, _
includedocproperties:=True, ignoreprintareas:=False, Openafterpublish:=True

End sub

Malheureusement pour moi, la macro ne marche pas. J'ai beau fouiller, il s'avère que c'est le répertoire DOSSIER qui n'est pas bien définit.

Merci d'avance pour votre aide.
 
Ce fil a été résolu! Aller à la solution…

_Thierry

XLDnaute Barbatruc
Bonjour @Bana XIII , le Forum

Je pense que la Syntax :
Dossier=ThisWorkbook.Path \ EXPORTS & FACTURE & ".PDF"
est mauvaise !
Essaies plutôt comme ceci :
VB:
Dossier = ThisWorkbook.Path & "\EXPORTS\FACTURE\FactureRef_" & Format(Now, "yyyy-mm-dd_hh-mm-ss") & ".PDF"
(Pour autant que les Folders "Exports" et sub-Folder "Facture" existent bien (sinon il faut les créer par 'MkDir'... après avoir testé leur existence ou non avec 'Dir'...)

Bonne soirée
@+Thierry
 
Ce message a été identifié comme étant une solution!

Pounet95

XLDnaute Occasionnel
Bonsoir,
Et encore et toujours, il faut que je commence à écrire pour qu'il me soit proposé de voir ce qui l'a déjà été !!!!!
Ca devient ch.......

Si quelqu'un a une solution, je suis preneur
Claude alias Pounet95
 

Webperegrino

XLDnaute Impliqué
Supporter XLD
Le Forum,
Bonsoir BanaXIII, Pounet95, Thierry,
Un autre exemple (bouton violet ExportPdf pour activer la macro).
Un Dossier "MON PROJET" qui contient :
- le fichier EXPORT.xlsm (dans lequel on crée la facture et on active le bouton de macro vba d'export de couleur en violet)
- un sous-Dossier "FACTURE" (qui recevra les exports de factures datées et en format .PDF).
Bon usage pour votre adaptation dans vos fichiers,
Cordialement,
Webperegrino
 

Fichiers joints

Dernière édition:

kiki29

XLDnaute Barbatruc
Salut, toujours consultable, en bas du Post#1 Impression de certaines Feuilles d'un classeur via un tableau dans un seul Pdf résultant
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas