Adapter ce code pour que cela enregistre les classeurs créés en .XLS

[miliev83]

Salut le forum,

Comment faire pour que le code enregistre en .xls ?

Merci d'avance

 

[Lone-wolf]

Re : Adapter ce code pour que cela enregistre les classeurs créés en .XLS

Bonsoir miliev

Est-ce que les noms on l'extension .xlsx?. Sinon il faut ajouter ceci

Activesheet.SaveAs Filename:=c & ".xls", FileFormat:=xlExcel8

 

[miliev83]

Re : Adapter ce code pour que cela enregistre les classeurs créés en .XLS

Merci pour ta réponse

 

[Lone-wolf]

Re : Adapter ce code pour que cela enregistre les classeurs créés en .XLS

Modifie
Chemin = "C:\Users\Jack\Desktop\test\test2\"
ActiveWorkbook.SaveAs Filename:=C & ".xls"

par
ActiveWorkbook.SaveAs Filename:=Chemin & C & ".xls"

 

[miliev83]

Re : Adapter ce code pour que cela enregistre les classeurs créés en .XLS

Ok merci !