Tipps & Tricks: Detail

Hier finden Sie zu dem ausgewählten Tipp oder Trick die detaillierten Angaben.

Wenn in den folgenden Erläuterungen Texte wie MsgBox formatiert sind, handelt es sich um konkret einzugebende Inhalte wie VBA-Code oder die Eingabe von Werten. Menüs wie Datei Speichern sind wie hier zu sehen formatiert. Schaltflächen oder Registerkarten auf Dialogen werden wie Menüs behandelt.

Alle Tipps sind nach bestem Wissen geprüft, aber selbstverständlich ohne Gewähr. Sollten Sie doch einen Fehler darin entdecken, würden wir uns freuen, wenn Sie uns per E-Mail Bescheid sagen.

Blätter verstecken ID 381

Wenn Sie eine Excel-Mappe mit Makro-gesteuerten Funktionalitäten ausstatten, brauchen Sie sehr schnell einen Platz, um ein paar Hilfsdaten speichern zu können. Wo? Natürlich in einer Tabelle! Wie können Sie aber verhindern, dass diese von normalen Benutzern einsehbar ist? Sie müssen sie nur gut genug verstecken:

Sub BlattWeg()
ActiveWorkbook.Sheets("Tabelle1").Visible = xlSheetHidden
End Sub

Das ist die normale Lösung, wie es per Menü Format Blatt Ausblenden manuell auch durchgeführt werden kann. Um ein solches Blatt wieder einzublenden, nutzen Sie Format Blatt Einblenden oder:

Sub BlattWeg()
ActiveWorkbook.Sheets("Tabelle1").Visible = xlSheetVisible
End Sub

Das hilft also nicht, denn solchermaßen versteckte Blätter sind immer noch einblendbar. Nur per VBA gibt es aber eine verschärfte Stufe des Versteckens:

Sub BlattWeg()
ActiveWorkbook.Sheets("Tabelle1").Visible = xlSheetVeryHidden
End Sub

So ausgeblendete Arbeitsblätter werden im Einblende-Dialog nicht mehr angezeigt. Ätsch!