G
Guest
Invité
Bonjour à tous,
j'ai créé une macro qui créé un nouveau dossier et enregistre dans ce dossier un onglet d'un fichier excel au format PDF. Je voudrais utiliser le contenu d'une cellule du fichier dans le nom que je donne au fichier PDF ainsi créé, et c'est là qu'apparait l'erreur 1004.... Si vous pouvez m'aider à lever ce problème, merci d'avance! voici la macro:
Sub test()
' Création nouveau dossier
MkDir ("U:\Finances\Etats de trésorerie\projet matrice Fred\nouveau")
Dim Range As Range
Dim test As String
test = "U:\Finances\Etats de trésorerie\projet matrice Fred\nouveau\Etat de trésorerie groupe" & Sheets("Index").Range("B2") & ".pdf"
Sheets("Récap").ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=test, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False
End Sub
j'ai créé une macro qui créé un nouveau dossier et enregistre dans ce dossier un onglet d'un fichier excel au format PDF. Je voudrais utiliser le contenu d'une cellule du fichier dans le nom que je donne au fichier PDF ainsi créé, et c'est là qu'apparait l'erreur 1004.... Si vous pouvez m'aider à lever ce problème, merci d'avance! voici la macro:
Sub test()
' Création nouveau dossier
MkDir ("U:\Finances\Etats de trésorerie\projet matrice Fred\nouveau")
Dim Range As Range
Dim test As String
test = "U:\Finances\Etats de trésorerie\projet matrice Fred\nouveau\Etat de trésorerie groupe" & Sheets("Index").Range("B2") & ".pdf"
Sheets("Récap").ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=test, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False
End Sub