Protection des feuilles

[Marie-Claude]

Bonjour,

J'aimerais protéger plusieurs feuilles en même temps, sans avoir à les protéger une à une. Aussi comment ôter la protection sur toutes les feuilles en même temps.


Merci beaucoup

 

[andré]

Salut Marie-Claude,

Sous Outils / Protection, tu peux choisir : Protéger le classeur.

André.

 

[A_Binouze_Drinker_Among_Others]

un exemple un peu compliqué.
et je pense qu'il peut être très améliorable en utilisant une variable tableau à deux dimensions


Sub test()

Dim arr_F As Variant
arr_F = Array("Feuil1", "Feuil2")
arr_F_Mdp = Array("abc", "def")


For Each AF In Sheets(arr_F)
Debug.Print Application.WorksheetFunction.Match(AF.Name, arr_F, 0)
AF.Unprotect arr_F_Mdp(Application.WorksheetFunction.Match(AF.Name, arr_F, 0) - 1)
Next AF
End Sub

 

[herve]

comment retrouver le mot de passe d'un classeur excel

ou acces