XL 2016 Création de pdf par macro VBA

Sylvain133

XLDnaute Nouveau
Bonjour à tous,

J'aurai besoin de créer un pdf à partir d'une macro vba, or je ne sais pas sous quelle forme rentrer le chemin relatif à l'enregistrement du fichier :

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
S\102-BA-BB\102.1-BBB\X\CCC 2\PPP & "\" & NUMEMP & ".pdf" _
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False

le code suivant ne marche pas, merci d'avance
 

Calvus

XLDnaute Barbatruc
Bonjour,

Comme ceci par exemple:

VB:
Range("A1:H69").Select

With ActiveSheet
    fichier = "\" & Range("E7") & " Commande du " & Format([f5], "ddmmyyyy") & " " & Range("K3") & ".pdf"
    dossier = "C:\Users\XXXXX\Documents\ETC"
    chemin = dossier & fichier
End With

Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:=chemin, _
    Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=True

A+
 

Discussions similaires