Voici comment faire sauter la protection (si tu programmes cela dans ton propre ribbon, tu n'as donc qu'à cliquer sur un bête bouton pour déprotéger; d'où mes deux secondes)
1. Afficher la sheet,
2. Appuyez sur ALT-F11 pour activer l'éditeur de code
3. Appuyez sur CTRL-G pour activer la "immediate window".
4. Introduisez cette ligne et appuyez sur Enter
ActiveSheet.Protect vbNullString, , True, , , , , , , , , , , , , True
5. Introduisez ensuite cette ligne et appuyez une nouvelle fois sur Enter
ActiveSheet.Unprotect vbNullString
Voilà, zou', protection, yaplus.
Partager