Protection des feuilles

Salut Marie-Claude,

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

André.

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

comment retrouver le mot de passe d'un classeur excel

ou acces