rep = ActiveSheet.ProtectContents (protection du contenu des cellules)
a+ rural thierry
"Jean-Luc CAPEL" a écrit dans le message de news:
Salut à tous, qq'un serait il me dire s'il existe une propriété pour savoir si une feuille
est protégée ou non. d'avance merci JLuc
AV
¨Pour être sur de son coup il faut tester les 3 propriétés :
Sub zz_TestProtect() With ActiveSheet If .ProtectContents + .ProtectDrawingObjects + .ProtectScenarios <> 0 _ Then MsgBox "Feuille protégée !" End With End Sub
AV
¨Pour être sur de son coup il faut tester les 3 propriétés :
Sub zz_TestProtect()
With ActiveSheet
If .ProtectContents + .ProtectDrawingObjects + .ProtectScenarios <> 0 _
Then MsgBox "Feuille protégée !"
End With
End Sub
¨Pour être sur de son coup il faut tester les 3 propriétés :
Sub zz_TestProtect() With ActiveSheet If .ProtectContents + .ProtectDrawingObjects + .ProtectScenarios <> 0 _ Then MsgBox "Feuille protégée !" End With End Sub
