[VBA-E]Copier un fichier avec nouveau nom

Version imprimable

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
Code:

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
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

Merci pour votre aide

21/05/2007, 09h17
ouskel'n'or

Tu as regardé dans l'aide, à printout ?

Citation:

Envoyé par l'aide

PrintToFile Argument de type Variant facultatif. Affectez-lui la valeur True pour imprimer dans un fichier. Si vous ne spécifiez pas PrToFileName, Microsoft Excel invite l'utilisateur à entrer le nom du fichier de sortie.

PrToFileName Argument de type Variant facultatif. Si l'argument PrintToFile a la valeur True, cet argument spécifie le nom du fichier vers lequel vous souhaitez effectuer l'impression.

.............................................:f1:
21/05/2007, 13h26
sethipremier

Citation:

Envoyé par ouskel'n'or

Tu as regardé dans l'aide, à printout ?

.............................................:f1:

Salut, ben en fait le nom du dossier où je veux envoyer mon fichier est déjà définie dans la configuration de pdfcreator.
Avec PrToFileName a true il ne l'enregistre même pas dans mon fichier.
J'ai vu aussi une commande comme "Name ... As ..." mais j'ai un petit problème de compréhension.
Une petite aide?