E
emirj
Guest
Bonjour tout le monde,
J'utilise actuellement Excel pour mettre à jour des graphiques
dans Word. Les graphiques sont dans un fichier xls et une macro
ouvre et referme simplement le document Word (code ci-dessous).
J'utilise la liaison précoce -marrant ce nom-.
J'aimerais maintenant automatiser le passage de ces fichiers Word
vers des documents .PDF. J'ai activé les bibliotèques Adobe suivantes :
AdobePDFMakerX, AcrobatPDFMaker et Acrobat. Et là je suis un peu
bloqué.
Est-ce que quelqu'un a déjà fait ça ?
Merci d'avance
Set wdApp = New Word.Application
With wdApp
.DisplayAlerts = wdAlertsNone
.Documents.Open Filename:=fichier_word, ConfirmConversions:=True, _
ReadOnly:=False, AddToRecentFiles:=False, PasswordDocument:="", _
PasswordTemplate:="", Revert:=False, WritePasswordDocument:="", _
WritePasswordTemplate:="", Format:=wdOpenFormatAuto
.ActiveDocument.Save
.ActiveDocument.Close
.Quit
End With
Set wdApp = Nothing
J'utilise actuellement Excel pour mettre à jour des graphiques
dans Word. Les graphiques sont dans un fichier xls et une macro
ouvre et referme simplement le document Word (code ci-dessous).
J'utilise la liaison précoce -marrant ce nom-.
J'aimerais maintenant automatiser le passage de ces fichiers Word
vers des documents .PDF. J'ai activé les bibliotèques Adobe suivantes :
AdobePDFMakerX, AcrobatPDFMaker et Acrobat. Et là je suis un peu
bloqué.
Est-ce que quelqu'un a déjà fait ça ?
Merci d'avance
Set wdApp = New Word.Application
With wdApp
.DisplayAlerts = wdAlertsNone
.Documents.Open Filename:=fichier_word, ConfirmConversions:=True, _
ReadOnly:=False, AddToRecentFiles:=False, PasswordDocument:="", _
PasswordTemplate:="", Revert:=False, WritePasswordDocument:="", _
WritePasswordTemplate:="", Format:=wdOpenFormatAuto
.ActiveDocument.Save
.ActiveDocument.Close
.Quit
End With
Set wdApp = Nothing