Bonjour,
Une fois de plus j'ai besoin de vous;
A l'ouverture de mon fichier excel j'ai ce message :
J'ai cliqué sur l'aide et il est indiqué qu' il existe un problème dans ThisWorkbook.
A cet endroit j ai le code suivant (j'ai anonymisé le mot de passe ici) qui correspond au code d'un cadenas qu'on m'a donné, il permet de protéger et déprotéger en une seule fois tous les onglets de mon fichier :
Private Sub Workbook_Open()
For Each sh In Sheets
sh.Protect "toto"
Next sh
Feuil20.CommandButton2.Visible = False
Feuil20.CommandButton1.Visible = True
End Sub
Un avis ?
Merci par avance pour votre aide
Bonne fin de journée
Une fois de plus j'ai besoin de vous;
A l'ouverture de mon fichier excel j'ai ce message :
J'ai cliqué sur l'aide et il est indiqué qu' il existe un problème dans ThisWorkbook.
A cet endroit j ai le code suivant (j'ai anonymisé le mot de passe ici) qui correspond au code d'un cadenas qu'on m'a donné, il permet de protéger et déprotéger en une seule fois tous les onglets de mon fichier :
Private Sub Workbook_Open()
For Each sh In Sheets
sh.Protect "toto"
Next sh
Feuil20.CommandButton2.Visible = False
Feuil20.CommandButton1.Visible = True
End Sub
Un avis ?
Merci par avance pour votre aide
Bonne fin de journée