Discussion :

[Chipss]

Bonjour,

J'ai un classeur qui est en lecture seule. apres plusieurs manipulation de ce classeur je souhaite le sauvegarder sous le même nom. J'utilise donc la methode Save associé à l'objet Workbooks. Malheureusement ceci me renvoit un message d'erreur m'indiquant que le classeur est en lecture seul et que si je veux réaliser une sauvegarde je dois changer le nom du fichier.

J'aurais donc aimé savoir s'il était possible de sauvegarder sous le même nom de manière immediate, car sinon l'astuce consistera à sauvegarder sous un autre nom, suprrimer l'ancien classeur et renommer le nouveau...mais bon si cel peut être fait directement ce serait mieux

Ou sinon savez vous comment retirer l'attribut lecture seule, attribut qui , audemeurant, n'a pas été specifié par moi et n'est pas coché dans la fenetre de propriété :/ ce que je trouve bizarre...


Chipss

[delphine35]

si ton fichier est en lecture seul, tu ne peux pas le supprimer car il est en lecture seule ...

Donc impossible de :

s'il était possible de sauvegarder sous le même nom de manière immediate

et impossible de :

l'astuce consistera à sauvegarder sous un autre nom, suprrimer l'ancien classeur et renommer le nouveau

Si tu veux qu'il garde le meme nom tu peux changer le repertoire !

Les raisons de la lecture seule : n'est il pas ouvert par quelqu'un d'autre en meme temps ? Il a pas planter ? ...

[Chipss]

Hmm je pense que mon astuce marche car je l'ai programmé et n'ai ps noté d'erreur. Je fait quelque chose de cette ordre la ou "classeur_ref.xls" et mon classeur d'origine.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Application.EnableEvents = False
Workbooks("classeur_ref.xls").SaveAs Filename:=ThisWorkbook.Path & "\classeur_ref2.xls"
Kill (ThisWorkbook.Path & "\classeur_ref.xls")
Workbooks("classeur_ref2.xls").SaveAs Filename:=ThisWorkbook.Path & "\classeur_ref.xls"
Kill (ThisWorkbook.Path & "\classeur_ref2.xls")
Workbooks("classeur_ref.xls").Close False
Application.EnableEvents = True

Je pense je vais garder cette solution vu qu'aperement c'est la seule


Chipss