Enregistrer macro en .xlsm sans erreur

Bonjour,

J'utilise une cod (*) afin de sauvegarder un classeur avec la date et l'heure.

Ce code va bien pour un format xls mais pas pour pour le format XLSM, il me provoque une erreur de fichier à l'ouverte faute d'être compatible.Et j'ai besoin qu'il soit en XLSM.

Après des recherches et des essais qui n'ont pas fonctionné, je m'en remets à vous pour cette solution.

Cette cod est utile pendant le travail des "très longs listings " que nous utilisons et nous fait gagner du temps.

Merci à vous.

Daryl.B

(*) cod trouvée sur le site.

Bonjour,

essaie ainsi :

chemin = ThisWorkbook.Path & Application.PathSeparator
date1 = Format(Date, " yyyymmdd")
 ActiveWorkbook.SaveAs _
            Filename:=chemin & reponse1 & date1 & ".xlsm", _
            FileFormat:=52

Bonjour,

Parfait.

L'équipe te remercie avec le sourire.

Cela marche Nikel.

"Et dire que cela parait évidement facile...".

Bonne journée.

DARYL.B.