Hoe toont u alle tabelnamen in Excel?
De methoden in dit artikel helpen u alle tabelnamen in een werkmap weer te geven.
Toon alle tabelnamen in het Namenblok
Toon alle tabelnamen in de Formulebalk
Toon alle tabelnamen met VBA-code
Toon alle tabelnamen in het Namenblok
Standaard worden alle tabelnamen weergegeven in het Namenblok.
Klik op de pijl van de vervolgkeuzelijst linksboven bij Namenblok om alle tabelnamen weer te geven. Zie de schermafbeelding:
Opmerking: Alle bereiknamen worden ook weergegeven in het Namenblok, samen met alle tabelnamen.
Ontgrendel de magie van Excel met KUTOOLS AI
- Slimme uitvoering: Voer celbewerkingen uit, analyseer gegevens en maak grafieken — allemaal met eenvoudige opdrachten.
- aangepaste formules: Genereer op maat gemaakte formules om uw workflows te stroomlijnen.
- VBA-programmeren: Schrijf en implementeer VBA-code moeiteloos.
- Formule-uitleg: Begrijp complexe formules moeiteloos.
- Tekstvertaling: Doorbreek taalbarrières in uw spreadsheets.
Toon alle tabelnamen in de Formulebalk
Als alle tabellen zijn voorzien van de standaardnamen zoals Tabel1, Tabel2…, kunt u deze namen weergeven in de formulebalk.
1. Voer de formule =RIJ(T) in op de formulebalk; daarna verschijnen alle tabelnamen in het keuzemenu, zoals op de onderstaande schermafbeelding is weergegeven.
Opmerking: Met deze methode worden gewijzigde tabelnamen niet weergegeven.
Toon alle tabelnamen met VBA-code
Als uw werkmap zowel standaard- als aangepaste tabelnamen bevat, kunt u ze tegelijkertijd weergeven met de volgende VBA-code.
1. Druk op Alt+F11 om het venster Microsoft Visual Basic for Applications te openen.
2. Klik in het venster Microsoft Visual Basic for Applications op Invoegen > Module. Kopieer vervolgens de onderstaande VBA-code naar het modulevenster.
VBA-code: Toon alle tabelnamen in Excel.
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 Sub3. Druk op de toets F5 of klik op de knop Uitvoeren om de code uit te voeren.
Er wordt vervolgens een nieuw Werkbladnaamd met de naam Tabelnaam gemaakt waarin alle tabelNamenlijst worden weergegeven, zoals op onderstaande schermafbeelding is getoond:
Gerelateerde artikelen:
- Hoe toont u de naam van een tabel of draaitabel in een cel in Excel?
- Hoe houdt u een tabel uitbreidbaar door een rij in te voegen in een beveiligd werkblad in Excel?
- Hoe wijzigt u de volgorde van kolommen in een Excel-tabel?
- Hoe verbergt u rijen met nulwaarden in een draaitabel?
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins