Comment protéger plusieurs feuilles d'un même classeur

[Marc2]

Bonjour,

j’aurais souhaité savoir comment faire pour protéger plusieurs feuilles d’un même classeurs en une seule opération.
Est-ce possible?

Merci à vous.
Marc

[FFO]

Bonjour

Dans un module mets ces lignes de code
Protection :

For i = 1 To Sheets.Count
Sheets(i).Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
Next

avec mot de passe « toto » :

For i = 1 To Sheets.Count
Sheets(i).Protect Password:=« toto », DrawingObjects:=True, Contents:=True, Scenarios:=True
Next

Déprotection :

For i = 1 To Sheets.Count
Sheets(i).Unprotect
Next

Avec mot de passe « toto » :
For i = 1 To Sheets.Count
Sheets(i).Unprotect Password:=« toto »
Next

Cela devrait le faire

[Marc2]

Merci à toi FFO,
je vais tester tout à l’heure.

Bonne soirée

[FFO]

Fais moi un retour
À plus tard

[Marc2]

Bonsoir FFO,
désolé de ne te répondre que maintenant, travail oblige.
J’ai tester, à part un détail ou l’autre comme les guillemets que j’ai du changer.
C’est super, ça marche…
Un grand merciiiiiii

[FFO]

Bonsoir
Même tardif merci pour ton retour
Ravi que cela fonctionne
Valides ma réponse un plus sympathique
Au plaisir de t aider à nouveau