protection de feuille

[Marc77]

Bonjour à tous

Je recherche comment protèger plusieurs feuilles en une seul manipulation.

Merci d'avance

 

[Pierrot93]

Re : protection de feuille

Bonjour Marc

A part par macro, je ne vois pas.

Ci dessous 2 macros à placer dans un module standard, une pour protéger, l autre pour déprotéger.

Sub ProtegeFeuilles()
Dim MaFeuille As Worksheet
For Each MaFeuille In Worksheets
    MaFeuille.Protect Password:="1234"
Next
End Sub
Sub DeProtegeFeuilles()
Dim MaFeuille As Worksheet
For Each MaFeuille In Worksheets
    MaFeuille.Unprotect Password:="1234"
Next
End Sub

Bonne soirée
@+

 

[Marc77]

Re : protection de feuille

Bonjour Pierrot93

Merci de ta réponse rapide qui après quelque test, me convient parfaitement .

Encore Merci
Marc

 

[criscris11]

Re : protection de feuille

Bonsoir Marc, Pierrot,
Marc tu peux également jeter un oeil sur ce lien qui n'est pas très vieux. Bien utilisé et avec les bons mots-clés, la fonction recherche du site est vraiment parfaite et devrait correspondre à bien des besoins. Voici le lien :
https://www.excel-downloads.com/threads/protection-dun-classeur.66503/
Bon courage.