Wie Sie feststellen, ob ein Excel-Tabellenblatt geschützt ist oder nicht

30. November 2011
Martin Althaus Von Martin Althaus, Excel, Office ...

So stellen Sie über ein VBA-Makro fest, ob ein Excel-Tabellenblatt geschützt ist oder nicht

Damit Sie Änderungen in Tabellenblättern über ein VBA-Makro vornehmen können, darf das Tabellenblatt nicht geschützt sein. Aber wie stellen Sie das fest? Verwenden Sie die Eigenschaft PROTECTCONTENTS.

Das folgende Makro zeigt, wie Sie die Eigenschaft auslesen und je nach Ergebnis ein Hinweisfenster anzeigen

Sub TabelleGeschuetzt()
If ActiveSheet.ProtectContents = True Then
 MsgBox "Die aktive Tabelle ist geschützt."
Else
 MsgBox "Die aktive Tabelle ist nicht geschützt."
End If
End Sub

Wenn die Tabelle geschützt ist, stellt das Makro das folgende Hinweisfenster dar:

Das Fenster zeigt ein geschütztes Tabellenblatt an

Falls es sich nicht um ein geschätztes Tabellenblatt handelt, wird auch darauf in einem Hinweisfenster hingewiesen:

Das aktive Excel-Tabellenblatt ist nicht geschützt

Zum Eingeben des Makros drücken Sie in Excel die Tastenkombination ALT F11, um den VBA-Editor aufzurufen. Wählen Sie dann EINFÜGEN – MODUL und geben Sie das Makro ein. In Excel können Sie es anschließend über die Tastenkombination ALT F8 starten.

Werden Sie mit unseren Tipps zum Excel-Profi!

Jetzt gratis per E-Mail

  • Excel Vorlagen zum Sofort-Download
  • Geprüfte Vorlagen zum Sofort-Einsatz
  • Gratis Makros & Add-Ins im Downloadcenter
DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Datenschutzgarantie:

Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters. Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter. Jederzeit abbestellbar durch einen Link im Newsletter.

Weitere Artikel zum Thema

Newsletter

Jetzt kostenlose Excel-Hilfe anfordern!

  • die besten Tipps
  • völlig kostenlos
  • jederzeit abbestellbar
DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Datenschutzgarantie:

Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters. Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter. Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Experten

Rudolf Ring twittert für @Computerwissen

Die von Ihnen eingegebene E-Mail Adresse ist nicht korrekt. Bitte korrgieren Sie Ihre Eingabe und klicken Sie auf "OK":

Bitte wählen Sie mindestens einen Newsletter aus und klicken Sie auf "OK"