Salut le fil,
d'abord il faut le sauver avec le nouveau nom ensuite tu l'attaches.
un bout de code pour la sauvegarde que tu le met avant l'attachement
ActiveWorkbook.SaveAs Filename:=ActiveWorkbook.Path & "\" & Sheets("Paramètres").Range("O3") .Value, FileFormat:= _
xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False