Tutorials

Tabellenblätter aus einer Liste erstellen und ein Inhaltsverzeichnis mit Verlinkungen anlegen

Melden

Hier ist ein ausführliches Tutorial, wie du in Excel automatisch Tabellenblätter aus einer Liste erstellst und anschließend ein verlinktes Inhaltsverzeichnis anlegst.

Dieses Tutorial zeigt dir zwei Wege: Den schnellen Weg über eine Pivot-Tabelle (ohne Programmierung) und den professionellen Weg über ein einfaches Makro (VBA).

Teil 1: Tabellenblätter aus einer Liste erstellen

Methode A: Der Pivot-Tabellen-Trick (Ohne VBA)

Diese Methode ist ideal, wenn du keine Makros verwenden möchtest.

  1. Liste vorbereiten: Schreibe alle Namen für deine zukünftigen Tabellenblätter in eine Spalte (z. B. Spalte A). Gib der Spalte eine Überschrift (z. B. „Name“).
  2. Pivot-Tabelle einfügen: Markiere deine Liste inkl. Überschrift. Gehe auf Einfügen > PivotTable und klicke auf OK.
  3. Filter setzen: Ziehe das Feld „Name“ in den Bereich Filter der Pivot-Tabelle.
  4. Blätter generieren:
    • Klicke oben im Menüband auf den Reiter PivotTable-Analyse.
    • Klicke ganz links auf den kleinen Pfeil neben Optionen.
    • Wähle Berichtsfilterseiten anzeigen....
    • Bestätige mit OK.
  5. Ergebnis: Excel erstellt nun für jeden Namen in deiner Liste automatisch ein eigenes Tabellenblatt. (Die Pivot-Elemente auf den neuen Blättern kannst du bei Bedarf markieren und löschen).

Methode B: Mit einem VBA-Makro (Schneller & Sauberer)

Wenn du viele Blätter erstellen willst, ist dieser Code am effizientesten.

  1. Drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Gehe auf Einfügen > Modul.
  3. Kopiere diesen Code hinein:
Sub BlätterAusListeErstellen()
    Dim Zelle As Range
    Dim Liste As Range
    ' Bereich anpassen, in dem deine Namen stehen
    Set Liste = Selection 

    For Each Zelle In Liste
        If Zelle.Value <> "" Then
            Sheets.Add(After:=Sheets(Sheets.Count)).Name = Zelle.Value
        End If
    Next Zelle
End Sub
  1. Gehe zurück zu Excel, markiere deine Liste mit den Namen und drücke ALT + F8. Wähle das Makro aus und klicke auf Ausführen.

Teil 2: Ein Inhaltsverzeichnis mit Verlinkungen erstellen

Sobald deine Blätter erstellt sind, möchtest du eine Übersicht (Table of Contents), von der aus du per Klick zu den Blättern springst.

Schritt 1: Die Namen auflisten

Erstelle ein neues Blatt namens „Inhalt“. Schreibe in Spalte A untereinander die Namen der Blätter, die du verlinken willst.

Schritt 2: Die HYPERLINK-Formel nutzen

Nutze in Spalte B (neben dem ersten Namen) folgende Formel:

=HYPERLINK("#'" & A2 & "'!A1"; "Zum Blatt springen")

Erklärung der Formel:

  • #: Steht für „in dieser Arbeitsmappe“.
  • ': Schützt den Blattnamen (wichtig, falls der Name Leerzeichen enthält).
  • A2: Die Zelle, in der der Name des Zielblatts steht.
  • !A1: Die Zelle im Zielblatt, die ausgewählt werden soll.
  • "Zum Blatt springen": Der Text, der in der Zelle angezeigt wird.

Ziehe die Formel nach unten kopieren, um alle Blätter zu verlinken.

Bonus: Automatisches Inhaltsverzeichnis per Makro

Wenn du sehr viele Blätter hast, kannst du das Inhaltsverzeichnis mit diesem Makro komplett automatisieren:

  1. Drücke wieder ALT + F11 und füge ein neues Modul ein.
  2. Nutze diesen Code:
Sub InhaltsverzeichnisErstellen()
    Dim i As Integer
    Dim wsInhalt As Worksheet

    ' Neues Blatt für das Inhaltsverzeichnis erstellen
    Set wsInhalt = Sheets.Add(Before:=Sheets(1))
    wsInhalt.Name = "Inhaltsverzeichnis"

    wsInhalt.Cells(1, 1).Value = "Tabellenblatt"
    wsInhalt.Cells(1, 1).Font.Bold = True

    For i = 2 To Sheets.Count
        wsInhalt.Hyperlinks.Add Anchor:=wsInhalt.Cells(i, 1), _
        Address:="", _
        SubAddress:="'" & Sheets(i).Name & "'!A1", _
        TextToDisplay:=Sheets(i).Name
    Next i

    wsInhalt.Columns(1).AutoFit
End Sub

Wichtiger Hinweis zum Speichern:

Da du nun Makros (VBA) verwendest, musst du deine Datei als Excel-Arbeitsmappe mit Makros (.xlsm) speichern, damit die Funktionen erhalten bleiben.

Zusammenfassung:

  • Liste erstellen -> Pivot-Trick oder VBA zum Generieren der Reiter.
  • Inhaltsverzeichnis -> Per HYPERLINK-Formel oder VBA-Skript verknüpfen.
0