Je suis en train de faire un publipostage. Je souhaite que la restitution soit au format PDF je ne m'y connais pas en codage.
J'utilise actuellement la macro suivante :
Sub ExportPDF()
Application.ScreenUpdating = False
e = "emplacement"
l = longueur
n = ActiveDocument.Windows(1).Panes(1).Pages.Count
i = 1
j = 1
While i < n :
ActiveDocument.ExportAsFixedFormat OutputFileName:= _
E & j & ".pdf", ExportFormat:= _
wdExportFormatPDF, OpenAfterExport:=False, OptimizeFor:= _
wdExportOptimizeForPrint, Range:=wdExportFromTo, From:=i,
To:=i + 1, Item:= _
wdExportDocumentContent, IncludeDocProps:=True,
KeepIRM:=True, _
CreateBookmarks:=wdExportCreateNoBookmarks,
DocStructureTags:=True, _
BitmapMissingFonts:=True, UseISO19005_1:=False
i = i + L
j = j + 1
Wend
Application.ScreenUpdating = True
MsgBox "Export terminé"
End Sub
J'aimerais que le résultat du publipostage soit au format PDF
Pouvez-vous m'aider svp ?