Bonjour, j'ai un fichier que je converti en PDF en passant par WORD.

Code VBA : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Set objWord = CreateObject("Word.Application")
Set net = WScript.CreateObject("WScript.Network")
Set objDoc = objWord.Documents.Open("C:\Users\"+net.username+"\Desktop\Test.docx")
strDefault = objWord.ActivePrinter
objWord.ActivePrinter = "Microsoft Print To PDF"
 
objWord.PrintOut
 
objWord.ActivePrinter = strDefault
 
objWord.Quit

Lorsque j'exécute le programme, une fenêtre s'ouvre me demandant de taper le nouveau nom du fichier. Pourriez-vous me dire comment faire pour indiquer le nouveau nom à enregistrer svp?

Merci d'avance de votre aide.
Arsène