Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
472to476
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
472to476
472to476
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Blattschutz abfragen
20.08.2004 15:58:29
Markus
Hallo Excel-Forum,
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

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Blattschutz abfragen
udo
Vielleicht kannst du es umgehn mit ...
...
On error goto Weiter:
Weiter:
ActiveSheet.Unprotect
...
sonst weis ich leider auch keinen Rat, s'gibt aber bestimmt was Anderes noch ...
;-)
AW: Blattschutz abfragen
20.08.2004 16:15:34
Markus
Hallo,
das wäre eine Möglichkeit die funktionieren würde wenn ich etwas hineinschreiben würde. Dann gäbe es eine Fehlermeldung die man abfangen könnte.
Nur will ich nichts in Zellen schreiben, sondern lediglich den Status abfragen ob es geschützt ist oder nicht.
Vieleicht findet sich noch eine andere Möglichkeit um den Blattschutzstatus abzufragen.
AW: Blattschutz abfragen
20.08.2004 16:23:52
Thomas
Hallo Markus,
wie wär's damit ...


      
Option Explicit
Private Sub CommandButton2_Click()
    MsgBox ActiveSheet.ProtectContents
End Sub 
Risi Thomas Softwareentwicklung
Anzeige
AW: Blattschutz abfragen
20.08.2004 16:30:15
Markus
Hallo Thomas,
genau nach dem hab ich gesucht :-)
Vielen Dank für den Tip, funktioniert einwandfrei !
Gruß,
Markus
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen