Bonjour à tous!
Je débute sous VBA et j'aurais besoin de votre aide.
J'aimerais créer sur un fichier Excel un bouton sauvagarder.
Il fonctionnerait ainsi:
- En cliquant dessus, une copie de mon fichier serait effectué et sera enregistrer dans un répertoire avec un nom définie. (le fichier original n'est pas modifier)
Jusque là tout va bien, voici mon code:
Private Sub CommandButtun1_Click ()
ThisWorkbook.SaveCopyAs Filename:="C:\Users\......" & "xls".
End Sub
Là ça ce complique:
- Lorsque la copie est enregistrée, un message de confirmation apparaîtrais du genre "votre travail a bien été enregistré"
- La copie doit être enregistré en lecture seule et si possible que toutes les macros de la copie soit désactivé.
- Et pour finir, que sur le fichier original, on ne puisse sauvagarder que par le bouton "sauvagarder" et non en passant par: fichier-enregistrer sous, ect.
(Certaine cellule de ce fichier doit être rempli par des utilisateurs donc je ne peux pas verrouiller tout le classeur)
Quelqu'un peut me donner un coup demain? ;-)
Merci d'avance!