Direkt zum Inhalt

Wie liste ich alle Tabellennamen in Excel auf?

Mit den Methoden in diesem Artikel können Sie alle Tabellennamen in einer Arbeitsmappe auflisten.

Listen Sie alle Tabellennamen im Namensfeld auf
Listen Sie alle Tabellennamen in der Formelleiste auf
Listen Sie alle Tabellennamen mit VBA-Code auf


Listen Sie alle Tabellennamen im Namensfeld auf

Alle Tabellennamen werden standardmäßig im Feld Name aufgeführt.

Klicken Sie auf den Dropdown-Listenpfeil in der oberen linken Ecke Namensfeld um alle Tabellennamen anzuzeigen. Siehe Screenshot:

Note: Alle Bereichsnamen werden auch im Namensfeld mit allen Tabellennamen aufgelistet.


Listen Sie alle Tabellennamen in der Formelleiste auf

Wenn alle Tabellen nach dem ursprünglichen Tabellennamen wie Tabelle1, Tabelle2… benannt wurden, können Sie versuchen, alle diese Tabellennamen in der Formelleiste aufzulisten.

1. Formel eingeben =ROW(T In der Formelleiste werden dann alle Tabellennamen im Listenfeld aufgelistet (siehe Abbildung unten).

Note: Geänderte Tabellennamen werden mit dieser Methode nicht aufgelistet.


Listen Sie alle Tabellennamen mit VBA-Code auf

Wenn Ihre Arbeitsmappe einen Standardtabellennamen und einen geänderten Tabellennamen enthält. Sie können sie mit dem folgenden VBA-Code sofort zusammen auflisten.

1. Drücken Sie die Taste Andere + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.

2. In dem Microsoft Visual Basic für Applikationen Klicken Sie im Fenster Insert > Modul. Kopieren Sie dann den folgenden VBA-Code in das Modulfenster.

VBA-Code: Listet alle Tabellennamen in Excel auf.

Sub ListTables()
'Updated by Extendoffice 20180503
    Dim xTable As ListObject
    Dim xSheet As Worksheet
    Dim I As Long
    I = -1
    Sheets.Add.Name = "Table Name"
    For Each xSheet In Worksheets
        For Each xTable In xSheet.ListObjects
            I = I + 1
            Sheets("Table Name").Range("A1").Offset(I).Value = xTable.Name
        Next xTable
    Next
End Sub

3. Drücken Sie die Taste F5 Geben Sie die Taste ein oder klicken Sie auf die Schaltfläche Ausführen, um den Code auszuführen.

Anschließend wird ein neues Arbeitsblatt mit dem Namen "Tabellenname" erstellt, in dem alle Tabellennamen wie im folgenden Screenshot aufgeführt sind:


In Verbindung stehende Artikel:

Beste Office-Produktivitätstools

🤖 Kutools KI-Assistent: Revolutionieren Sie die Datenanalyse basierend auf: Intelligente Ausführung   |  Code generieren  |  Erstellen Sie benutzerdefinierte Formeln  |  Analysieren Sie Daten und erstellen Sie Diagramme  |  Rufen Sie Kutools-Funktionen auf...
Beliebte Funktionen: Suchen, markieren oder identifizieren Sie Duplikate   |  Leere Zeilen löschen   |  Kombinieren Sie Spalten oder Zellen, ohne Daten zu verlieren   |   Runde ohne Formel ...
Super-Lookup: VLookup mit mehreren Kriterien    VLookup mit mehreren Werten  |   VLookup über mehrere Blätter hinweg   |   Unscharfe Suche ....
Erweiterte Dropdown-Liste: Erstellen Sie schnell eine Dropdown-Liste   |  Abhängige Dropdown-Liste   |  Mehrfachauswahl Dropdown-Liste ....
Spaltenmanager: Fügen Sie eine bestimmte Anzahl von Spalten hinzu  |  Spalten verschieben  |  Schalten Sie den Sichtbarkeitsstatus ausgeblendeter Spalten um  |  Vergleichen Sie Bereiche und Spalten ...
Ausgewählte Funktionen: Rasterfokus   |  Designansicht   |   Große Formelleiste    Arbeitsmappen- und Blattmanager   |  Ressourcen (Autotext)   |  Datumsauswahl   |  Arbeitsblätter kombinieren   |  Zellen verschlüsseln/entschlüsseln    Senden Sie E-Mails nach Liste   |  Superfilter   |   Spezialfilter (Filter fett/kursiv/durchgestrichen...) ...
Top 15 Toolsets12 Text Tools (Text hinzufügen, Zeichen entfernen, ...)   |   50+ Chart Typen (Gantt-Diagramm, ...)   |   40+ Praktisch Formeln (Berechnen Sie das Alter basierend auf dem Geburtstag, ...)   |   19 Einfügen Tools (QR-Code einfügen, Bild aus Pfad einfügen, ...)   |   12 Umwandlung (Conversion) Tools (Zahlen zu Wörtern, Currency Conversion, ...)   |   7 Zusammenführen & Teilen Tools (Erweiterte Zeilen kombinieren, Zellen teilen, ...)   |   ... und mehr

Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen.  Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...

Beschreibung


Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
Comments (4)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Thanks so much for sharing this information. Just what I was looking for. In fact, I want to abuse of your favor. How can I get the headings of the tables? Something like this Table1[Heading1] Thanks
This comment was minimized by the moderator on the site
Thanks a lot for VBA to list all tables in a workbook.
This comment was minimized by the moderator on the site
Thank you for this very useful post.
I have been wondering why is my Custom view greyed out, and I figured out it was due to an inserted table ! (not obvious)
This comment was minimized by the moderator on the site
Using the ListTables VB, is there a way to also include the tableNumber in the corresponding column ?
The reason I ask is because there have been some errors reported by Excel referring to the table numbers but I don't have visibility of the numbers anymore since I change the table names to something more descriptive but as Excel still uses the original table numbers in its error reporting, it's impossible for me to identify which of the many tables it had an issue with.

There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations