Bonjour à tous,

Voici mon problème, je dois convertir un fichier word en pdf en utilisant le distiller d'acrobat.

Voici mon code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Dim wdApp As Object
Dim FileNamePDF As String
 
Set wdApp = CreateObject("Word.Application")
wdApp.Documents.Open ("C:\Documents and Settings\ben\My Documents\ORM\Commentaires_062007.doc")
FileNamePDF = "C:\Documents and Settings\ben\My Documents\ORM\commentaire.pdf"
wdApp.DisplayAlerts = wdAlertsNone
wdApp.PrintOut , , , FileNamePDF, , , , , , , True
wdApp.ActiveDocument.Close
wdApp.Quit
Set wdApp = Nothing
Alors il crée bien le fichier pdf mais impossible de l'ouvrir car il m'indique que le fichier est probablement corrompu.

Est ce que je ne devrais pas d'abord sélectionner le document word avant de le convertir ???

Auriez-vous une petite idée ???

D'avance je vous remercie

Benjisan