Discussion :

[taratata_69]

Bonjour,

Comment puis je récupérer l'information sur l'état de protection du classeur de type (oui ou non, vrai ou faux) et sur l'état de protection des feuilles?

Merci pour vos suggestions

[Minick]

Salut,

Pour les feuilles utilise la propriete ProtectContents.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
If Worksheets("Feuil1").ProtectContents then
    MsgBox "La feuille Feuil1 est protegee".
End If

Pour le classeur je ne vois pas... Ou j'ai mal compris...

++
Minick

[aalex_38]

Bonjour,

Protextion pour le classeur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Dim wb As Workbook
 
Set wb = ThisWorkbook
 
If wb.ProtectStructure = True Then
    MsgBox "Les structures du classeur sont protégées"
End If
 
If wb.ProtectWindows = True Then
    MsgBox "Les fenêtres du classeur sont protégées"
End If

[taratata_69]

Effectivement ces codes permettent de controller l'état de protection des feuilles et du classeur.

merci pour vos réponses.