EXCEL / VBA. Création dossier PDF + Nom fichier variable + dossier variable

Maxim_

XLDnaute Nouveau
Hello tout le monde,

Je cherche à créer une maccro qui dans un premier temps enregistre / convertie mon fichier en pdf et ensuite l'enregistre dans un dossier variable (selon le nom client, en l'occurence dans mon fichier cellule "B9").
J'ai réussi à créer les 2 maccros mais je n'arrive pas à les compiler.

Maccro "Enregistrer PDF" = converti en pdf à l'aide de l'imprimante "

Sub impr_PDF()
Application.ActivePrinter = "ScanSoft PDF Create! sur Ne00:"
ActiveWindow.SelectedSheets.PrintOut copies:=1, ActivePrinter:= _
"ScanSoft PDF Create! sur Ne00:", Collate:=True

End Sub


Maccro "Enregistrement dans dossier variable"

Sub Bouton16_QuandClic()

Dim chemin As String, fichier As String
Sheets("feuil1").Copy
chemin = ThisWorkbook.Path
fichier = chemin & "\" & "Enquête_" & Range("B9") & "_" & Format(Date, "dd.mm.yyyy") & ".xls"
ActiveWorkbook.SaveAs Filename:="D:\Documents and Settings\maxime\Desktop\Dossier client\" & [B9] & "\" & "FCC\" & "Enquête_" & Range("B9") & "_" & Format(Date, "dd.mm.yyyy") & ".xls"

End Sub


Pour info je travail sur EXCEL 2003 et j'ai PDF Create 5!
Merci d'avance pour votre aide
 

Discussions similaires

Statistiques des forums

Discussions
312 083
Messages
2 085 175
Membres
102 807
dernier inscrit
Routier78