Bonjour a tous,
Pour votre problème, je ne sais pas vraiment si cela peut vous aider mais je renomme mes fichiers comme ceci
nomfichier As String
nomfichier = "confidentiel" & "_" & Format(Date , "yyyy_dd_mmmm") & ".pdf"
dans ton cas je pense que ça pourrait être ça , mais ça s'applique dans la création d'un fichier que tu peut stocké dans un
Chemin As String
Chemin= 'Ton chemin
puis
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Chemin & "\" & nomfichier, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=True
Voila en esperant que cela vous auras servi.