H
hernandez
Guest
Bonjour,
Je n'arrive pas à imprimer toutes les lettres d'un fichier de fusion.
Voici mon code (extrait) :
Set Wrd = CreateObject("Word.Application")
Set appWord = Wrd.Documents.Open("Chemin du fichier")
Wrd.activedocument.PrintOut
Wrd.Documents.Close SaveChanges:=wdDoNotSaveChanges
Mais ça ne m'imprime que le premier enregistrement.
Ou est le truc !
Merci d'avance
Je n'arrive pas à imprimer toutes les lettres d'un fichier de fusion.
Voici mon code (extrait) :
Set Wrd = CreateObject("Word.Application")
Set appWord = Wrd.Documents.Open("Chemin du fichier")
Wrd.activedocument.PrintOut
Wrd.Documents.Close SaveChanges:=wdDoNotSaveChanges
Mais ça ne m'imprime que le premier enregistrement.
Ou est le truc !
Merci d'avance