Temjeh XLDnaute Accro Supporter XLD 8 Décembre 2021 #1 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 VB: MyPath = Sheets("Impression").Range("K6") MyFileName = "Sauvegarde" ChDir MyPath ActiveSheet.Copy ActiveSheet.SaveAs Filename:=MyFileName
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 VB: MyPath = Sheets("Impression").Range("K6") MyFileName = "Sauvegarde" ChDir MyPath ActiveSheet.Copy ActiveSheet.SaveAs Filename:=MyFileName
Temjeh XLDnaute Accro Supporter XLD 8 Décembre 2021 #2 Désolé je viens de trouver FileFormat:=xlOpenXMLWorkbookMacroEnabled Merci Vote positif 0 Vote négatif