Bonjour, j'aimerais sauvegarder un fichier en pdf avec un nouveau nom venant d'une textbox.
Au préalable j'ai déjà effectué une copie papier de ce document. Voici mes codes
Donc pour résumer j'aimerais remplacer le nom du fichier pdf avec le contenu d'une textbox c:\monchemin\anciennom.pdf par c:\monchemin\nouveaunom_textbox.pdf
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Rem Impression des feuilles de contrôle 1 et 2 Rem copie papier Worksheets("IMP").Select Application.ActivePrinter = "HP LaserJet 5100 reseau sur Ne04:" ActiveWindow.SelectedSheets.PrintOut Copies:=2, ActivePrinter:= _ "HP LaserJet 5100 reseau sur Ne04:", Collate:=True Rem copie pdf Application.ActivePrinter = "PDFCreator sur Ne01:" ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _ "PDFCreator sur Ne01:", Collate:=True
Merci pour votre aide
Partager