VBA_dev_Anne_Marie
XLDnaute Occasionnel
Bonjour,
J'imprime un fichier excel en pdf avec le code :
L'impression se passe bien mais je ne veux pas afficher les propriétés en bas à droite de mon document .pdf (surligné en jaune) :
J'ai essayé avec IncludeDocProperties:=False mais ça ne marche pas.
Merci pour vos conseils 🙂
J'imprime un fichier excel en pdf avec le code :
VB:
Sub Fichier_pdf()
Dim LHeure As String
Dim LaDate As String
LHeure = Format(Time, "HMS")
LaDate = Format(Date, "dd" & "." & "mm" & "." & "yyyy")
' Création fichier PDF
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"\XXXXX\Création du fichier le " & LaDate & " " & LHeure & ".pdf", Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
From:=1, To:=1, OpenAfterPublish:=False
' Message de confirmation
MsgBox ("Création du fichier PDF effectué" & vbCrLf & vbCrLf & "Merci ")
End SubL'impression se passe bien mais je ne veux pas afficher les propriétés en bas à droite de mon document .pdf (surligné en jaune) :
J'ai essayé avec IncludeDocProperties:=False mais ça ne marche pas.
Merci pour vos conseils 🙂