Name der Tabellenblätter auflisten

Forumthread: Name der Tabellenblätter auflisten

17.03.2015 09:31:15

Leonard

Hallo zusammen,
ich habe ein Problem mit einer Excel-Tabelle, die zur Abrechnung einer Getränkekeller-Kasse genutzt werden soll.
Insgesamt sollen der Getränkeverbrauch von ca. 100 Personen erfasst werden. Ich habe nun sehr aufwändig für jede Person ein eigenes Blatt, das nach ihr benannt ist, erstellt. Ferner habe ich in hoffnungsvoll weiser Voraussicht bereits in jedem Tabellenblatt den Namen der jeweiligen Person noch in A1 geschrieben.
Mein Plan war es, dass ich nun auf einem Abrechnungsblatt einfach einen Bezug zu der Namenszelle (A1) der jeweiligen Blätter setzen kann und diesen dann einfach "runterziehe", so dass Excel den Bezug automatisch für jedes Tabellenblatt erstellt.
Leider ist es nun so, dass Excel nicht die Blätter fortlaufend durchgeht sondern die Zellen der Blätter, auf die ich manuell Bezug genommen habe.
Plan: Eine Spalte, in der die Namen automatisch stehen, sprich
='Peter Müller'A1
='Hans Müller'A1
etc.
Realität:
='Peter Müller'A1
='Hans Müller'A1
='Peter Müller'A2
='Hans Müller'A2
etc.
Es wäre fabelhaft, wenn mir hier jemand helfen kann!
Besten Dank und Grüße

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Name der Tabellenblätter auflisten

17.03.2015 09:39:40

Rudi
AW: Name der Tabellenblätter auflisten

17.03.2015 10:05:20

Leonard
J22 statt A1 owT

17.03.2015 10:58:02

Rudi

AW: Name der Tabellenblätter auflisten

17.03.2015 09:39:40

Rudi

Hallo,
definiere einen Namen (strg+F3)
Name: x
Bezieht sich auf: =Arbeitsmappe.Zuordnen(1+0*jetzt())
In dein Abrechnungsblatt:
=WENNFEHLER(INDIREKT("'" &INDEX(x;ZEILE(A2)) &"'!A1");"")
und nach unten koieren.
Gruß
Rudi

AW: Name der Tabellenblätter auflisten

17.03.2015 10:05:20

Leonard

Hallo Rudi,
vielen, vielen Dank für Deine Antwort. Du hast mir super weitergeholfen. Eine Frage hätte ich noch:
Ich möchte in jedem der einzelnen Blätter gesondert eine Abrechnung durchführen, an deren Ende ein zu bezahlender Betrag stehen wird. Wie schaffe ich es, dass der Wert der Zelle (z.B. J22), die den zu bezahlenden Betrag enthält, im Abrechnungsblatt in der Spalte neben dem jeweiligen Namen zu sehen ist. Ich habe die Vermutung, dass hier wieder das gleiche Problem entstehen wird und ich auch hier nicht einfach mit "='Peter Müller'J22" und runterkopieren arbeiten kann.
Besten Dank nochmal und viele Grüße,
Leonard

J22 statt A1 owT

17.03.2015 10:58:02

Rudi

Infobox / Tutorial

Schritt-für-Schritt-Anleitung

Um alle Blattnamen in Excel aufzulisten, kannst Du die folgende Methode verwenden, die ohne VBA auskommt:

Öffne Dein Excel-Dokument.
Gehe zu dem Arbeitsblatt, in dem Du die Liste der Tabellenblätter anzeigen möchtest.
Drücke Strg + F3, um den Namens-Manager zu öffnen.
Klicke auf "Neu", um einen neuen Namen zu definieren.
Gib unter „Name“ einen beliebigen Namen ein, z.B. x.
Bei „Bezieht sich auf“ trage die folgende Formel ein:
```
=Arbeitsmappe.Zuordnen(1+0*jetzt())
```
Klicke auf „OK“.
Gehe zurück zu Deinem Arbeitsblatt und füge in die Zelle A1 die folgende Formel ein:
```
=WENNFEHLER(INDIREKT("'" & INDEX(x; ZEILE(A1)) & "'!A1"); "")
```
Ziehe die Formel nach unten, um die Namen aller Tabellenblätter aufzulisten.

Diese Methode hilft Dir, eine Excel-Liste aller Tabellenblätter zu erstellen, ohne dass Du VBA verwenden musst.

Häufige Fehler und Lösungen

Fehler 1: Die Liste zeigt nur Fehler an.
Lösung: Stelle sicher, dass Du die Formel korrekt eingegeben hast und dass die Zellreferenzen stimmen.

Fehler 2: Die Namen werden nicht aktualisiert.
Lösung: Überprüfe, ob die Arbeitsmappe gespeichert ist und alle Blätter korrekt benannt sind.

Alternative Methoden

Falls Du VBA verwenden möchtest, um die Namen aller Tabellenblätter aufzulisten, kannst Du folgenden Code verwenden:

Sub BlattnamenAuflisten()
    Dim ws As Worksheet
    Dim i As Integer
    i = 1
    For Each ws In ThisWorkbook.Worksheets
        Sheets("DeinAbrechnungsblatt").Cells(i, 1).Value = ws.Name
        i = i + 1
    Next ws
End Sub

Füge diesen Code in ein neues Modul ein und führe das Makro aus. Dies ist eine einfache Methode, um alle Tabellenblätter in einer Übersicht anzuzeigen.

Praktische Beispiele

Stell Dir vor, Du hast 10 Tabellenblätter für verschiedene Personen erstellt, z.B. „Peter Müller“, „Hans Müller“. Wenn Du die oben genannten Schritte befolgst, kannst Du eine Liste erstellen, die automatisch aktualisiert wird, wenn Du neue Blätter hinzufügst.

Tipps für Profis

Du kannst die Namen der Tabellenblätter auch in einer Dropdown-Liste verwenden, um die Navigation zu erleichtern.
Nutze bedingte Formatierungen, um die Blätter visuell hervorzuheben.
Experimentiere mit verschiedenen Formeln, um zusätzliche Informationen aus den Blättern zu extrahieren.

FAQ: Häufige Fragen

1. Wie kann ich alle Tabellenblätter in einer neuen Arbeitsmappe auflisten?
Wenn Du eine neue Arbeitsmappe erstellst, kannst Du die oben beschriebene Methode zur Auflistung der Blattnamen verwenden.

2. Ist es möglich, die Liste der Blattnamen automatisch zu aktualisieren?
Ja, indem Du die Formeln in einem Arbeitsblatt verwendest, die auf die Blattnamen zugreifen, wird die Liste automatisch aktualisiert, wenn Du neue Blätter hinzufügst oder entfernst.

Beliebteste Forumthreads (12 Monate)

Name der Tabellenblätter auflisten

Forumthread: Name der Tabellenblätter auflisten

3 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Infobox / Tutorial

Tabellenblätter in Excel auflisten

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread