Bonjour à tous,
J'ai bidouillé une macro qui ouvre une boite de dialogue avec un nom de fichier par défaut issu de certaines cellules du classeur et enregistrement forcé vers du pdf.
Lorsque l'on clique sur "annuler" de la boite de dialogue, il enregistre quand même un fichier intitulé "faux.pdf"
Comment faire pour éviter cela ?
Je vous remercie bien
ps: je suis une quiche en VBA et ne sais que faire des copier coller de macros glanées sur le web.
J'ai bidouillé une macro qui ouvre une boite de dialogue avec un nom de fichier par défaut issu de certaines cellules du classeur et enregistrement forcé vers du pdf.
Lorsque l'on clique sur "annuler" de la boite de dialogue, il enregistre quand même un fichier intitulé "faux.pdf"
Comment faire pour éviter cela ?
Je vous remercie bien
ps: je suis une quiche en VBA et ne sais que faire des copier coller de macros glanées sur le web.
Code:
Sub Bouton_PDF_equipe()
Dim NomDefaut As String
NomDefaut = "Planning Equipe - " & Range("C2").Value & " - " & Range("C3").Value & " - HP" & Range("F2").Value & Range("AH2").Value & ".pdf"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Application.GetSaveAsFilename(NomDefaut, "Fichier PDF (*.pdf), *.pdf")
End Sub
Dernière édition: