Hello,

J'essaie d'écrire un script VBS qui me permette d'imprimer un fichier excel, j'utilise pour cela l'imprimante pdf d'Adobe Acrobat. Mais au moment de l'impression, je dois donner un nom pour sauvegarder le pdf contrairement a une impression classique.

Voici mon code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Dim Xlapp 'Excel
 Dim wb 'le classeur
 Set XlApp = CreateObject("Excel.application")
 XlApp.Visible = True
 Set Wb = XlApp.Workbooks.Open("C:\tmp\MonClasseur.xls")
 Wb.Sheets(1).PrintOut ,,,,"CutFtp sur FPP1:"
 wb.close false 
 XlApp.quit 
 Set Wb = Nothing
 Set XlApp = Nothing
Que dois-je rajouter pour lui donner le nom du fichier pdf générer ?

Merci de votre aide.