Versteckte Excel-Tabellenblätter auflisten

14. Oktober 2009
Martin Althaus Von Martin Althaus, Excel, Office ...

So erzeugen Sie eine Liste der verborgenen Tabellen per VBA

Blätter einer Arbeitsmappe können Sie über das Kommando "Format – Blatt – Ausblenden" unsichtbar machen. Dann ist es weiterhin möglich, auf die Tabelleninhalte per Formel zuzugreifen, sichtbar ist die Tabelle aber nicht mehr.

Falls Sie eine Aufstellung aller verborgenen Tabellenblätter in der aktiven Arbeitsmappe benötigen, können Sie das folgende Makro einsetzen:

Sub ListeVersteckteTabellenAuf()
Dim Tabelle As Worksheet, NeueTabelle As Worksheet
Dim AktuelleMappe As Workbook
Dim i As Integer
Set AktuelleMappe = ActiveWorkbook
Set NeueTabelle = Workbooks.Add.Sheets(1)
For Each Tabelle In AktuelleMappe.Worksheets
 If Tabelle.Visible = False Then
   i = i + 1
   NeueTabelle.Cells(i, 1).Value = Tabelle.Name
  End If
Next Tabelle
End Sub

Das Makro durchläuft alle Tabellenblätter in einer Schleife und prüft die Eigenschaft Visible. Wenn Sie nicht erfüllt ist, handelt es sich um ein verstecktes Tabellenblatt. Dann wird der Name des Blatts in die Liste übertragen.

Die Namen aller verborgenen Tabellenblätter werden durch das Makro auf diese Weise in einer Tabelle in einer neuen Arbeitsmappe aufgelistet.

Die Abbildung zeigt das Ergebnis des Makros, wenn in der aktiven Arbeitsmappe drei versteckte Tabellenblätter enthalten sind: "Versteckt", "Verborgen" und "Unsichtbar".

Tipp: Falls Sie wissen möchten, wie Sie Makros in Excel eingeben und starten, finden Sie hier eine Kurzbeschreibung:
www.exceldaily.de/excel-makros-vba/artikel/d/so-geben-sie-makros-in-excel-ein.html

Werden Sie mit unseren Tipps zum Excel-Profi!

Jetzt gratis per E-Mail

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"