XL 2019 Enregistrer feuille

[Temjeh]

Bonjour et merci d'avance

Il me semble que j'avais ce code mais je ne trouve plus.

J'aimerais enregistrer la feuille active avec ses Macros et module.
Ce code fonctionne mais il sauvegarde juste en XLSX.
Possible en XLSM?

Merci de votre temps
Temjeh

MyPath = Sheets("Impression").Range("K6")
MyFileName = "Sauvegarde"
ChDir MyPath
ActiveSheet.Copy
ActiveSheet.SaveAs Filename:=MyFileName

 

[Temjeh]

Désolé je viens de trouver
FileFormat:=xlOpenXMLWorkbookMacroEnabled

Merci