OVH Cloud OVH Cloud

Protection et déprotection d'un classeur Excel

1 réponse
Avatar
Jean LANNELUCQ
Bonsoir =E0 tous,

J'utilise des classeurs avec des onglets prot=E9g=E9s par un mot de passe.

A chaque fois que je veux modifier une feuille excel, je suis oblig=E9 de=
=20
saisir une fois le mot de passe, faire mes modifications et ressaisir=20
mon mot de passe deux fois de suite .... cela pour chaque feuille que je=20
modifie.

1 - Est-il possible de prot=E9ger toute les feuilles d'un classeur en une=
=20
passe seulement ?
2 - M=EAme question pour d=E9prot=E9ger toutes les feuilles de mon classeur=
en=20
une passe ?
3 - En imaginant que dans un classeur des feuilles soient prot=E9g=E9es et=
=20
d'autres non, est-il possible de modifier le statut des feuilles=20
prot=E9g=E9es uniquement ??

Si oui pour ces 3 questions, j'attends vos solutions ou vos pistes de=20
r=E9flexion avec une grande impatience.

Bien cordialement =E0 vous tous et merci par avance

Jean

1 réponse

Avatar
garnote
Salut Jean,

Une piste :

Sub Protège_Toutes_Les_Feuilles()
For Each f In ActiveWorkbook.Worksheets
f.Protect Password:="motdepasse"
Next
End Sub

Sub Déprotège_Toutes_Les_Feuilles()
For Each f In ActiveWorkbook.Worksheets
f.Unprotect Password:="motdepasse"
Next
End Sub

Serge


"Jean LANNELUCQ" a écrit dans le message de
news:
Bonsoir à tous,

J'utilise des classeurs avec des onglets protégés par un mot de passe.

A chaque fois que je veux modifier une feuille excel, je suis obligé de
saisir une fois le mot de passe, faire mes modifications et ressaisir
mon mot de passe deux fois de suite .... cela pour chaque feuille que je
modifie.

1 - Est-il possible de protéger toute les feuilles d'un classeur en une
passe seulement ?
2 - Même question pour déprotéger toutes les feuilles de mon classeur en
une passe ?
3 - En imaginant que dans un classeur des feuilles soient protégées et
d'autres non, est-il possible de modifier le statut des feuilles
protégées uniquement ??

Si oui pour ces 3 questions, j'attends vos solutions ou vos pistes de
réflexion avec une grande impatience.

Bien cordialement à vous tous et merci par avance

Jean