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

Membres actuellement en ligne

Statistiques des forums

Discussions
312 177
Messages
2 085 972
Membres
103 073
dernier inscrit
MSCHOE16