wie kann ich per VBA überprüfen ob das aktuelle Arbeitsblatt einen Blattschutz hat oder nicht.
Mein Versuch mit:
If ActiveSheet.Protect = True then
....
End If
schlug schon mal fehl da die Anweisung Protect keinen Rückgabewert liefert.
Grüße, Markus
Option Explicit
Private Sub CommandButton2_Click()
MsgBox ActiveSheet.ProtectContents
End Sub
Risi Thomas Softwareentwicklung