sauvegarde qui ne sauvegarde pas

[denis]

Bonjour à tous

Avec la macro suivant, Normalement je doit sauvgarder. Mais????

Sub enregistr()
ThisWorkbook.Save
ActiveWorkbook.SaveCopyAs Filename:="D:\tmp\Reservation" & ".xls"
End Sub

Qaunt je ferme le fichier et je l'ouvre à nouveau, je suis en lecture seul??

Quelqu'un à une soluce?
salutation @+ denis

 

[@Christophe@]

Bonjour Denis

Essaye plutot comme ceci:

Sub enregistr()
ThisWorkbook.Save
ActiveWorkbook.SaveAs Filename:="D:\tmp\Reservation" & ".xls"
End Sub

Bonne journée

@Christophe@