Enregistrer en xls par macro

Bonjour,

J'utilise un fichier en XLSM et lorsque j'applique la macro ci dessous (qui fonctionne bien), je voudrais que le fichier s'enregistre en XLS et non XLSM

ActiveWorkbook.SaveAs Filename:="E:\" & Worksheets("Photos").[E5].Value & " Livret Bac pro CSR"

Merci par avance

Bonjour Albatros182,

Je vous invite à tester comme cela:

ActiveWorkbook.SaveAs Filename:="E:\" & Worksheets("Photos").[E5].Value & " Livret Bac pro CSR.xlsx", FileFormat:=xlOpenXMLWorkbook

A+

Bonjour,

Merci pour votre réponse.

La macro bloque sur "fileformat:=" en mettant "erreur de compilation Attendu : fin d'inscription

il manquait une virgule, merci et bonne soirée