Blattschutz Switch ein/aus
30.11.2007 11:32:00
Peter
Ich möchte für Tabelle6 einen Blattschutz Switch einrichten, d.h. wenn die Datei geschützt ist, soll sie entschützt werden, andernfalls umgekehrt.
Wie kann ich abfragen, wie der Zustand ist? mit If Tabelle6.Protection = False komme ich nicht weiter.
Danke für jede Hilfe, Peter
Sub BlattSchutzSwitch()
If Tabelle6.Protection = False Then
Tabelle6.Protect userinterfaceonly:=True
Else
Tabelle6.Unprotect
End If
End Sub
Anzeige