Kako našteti vsa imena tabel v Excelu?

Za naštevanje vseh imen tabel v delovnem zvezku vam lahko pomagajo načini v tem članku.

V imenskem polju navedite vsa imena tabel
V vrstici s formulami navedite vsa imena tabel
Navedite vsa imena tabel s kodo VBA

V imenskem polju navedite vsa imena tabel

Neverjetno! Uporaba učinkovitih zavihkov v Excelu Tako kot Chrome, Firefox in Safari!

Prihranite 50% svojega časa in vsak dan zmanjšajte na tisoče klikov z miško!

---

Vsa imena tabel so privzeto navedena v polju Ime.

Kliknite puščico spustnega seznama v zgornjem levem kotu ime Box za prikaz vseh imen tabel. Oglejte si posnetek zaslona:

Opombe: Vsa imena z obsegom so navedena tudi v polju z imeni z vsemi imeni tabel.

V vrstici s formulami navedite vsa imena tabel

Če so bile vse tabele poimenovane z izvirnimi imeni tabel, na primer Tabela1, Tabela2 ..., lahko poskusite vsa ta imena tabel našteti v vrstici s formulami.

1. Vnesite formulo =ROW(T v vrstico formul, potem so vsa imena tabel navedena v seznamskem polju, kot je prikazano spodaj.

Opombe: Imena tabel, ki so bila spremenjena, s to metodo ne bodo navedena.

Navedite vsa imena tabel s kodo VBA

Če sta v delovnem zvezku privzeto ime in spremenjeno ime tabele. Lahko jih naštejete naenkrat skupaj z naslednjo kodo VBA.

1. Pritisnite druga + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. V Ljubljani Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > Moduli. Nato kopirajte spodnjo kodo VBA v okno modula.

Koda VBA: v Excelu navedite vsa imena tabel.

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. Pritisnite F5 tipko ali kliknite gumb Zaženi, da zaženete kodo.

Nato se ustvari nov delovni list z imenom tabele z vsemi imeni tabel, navedenimi na spodnji sliki zaslona:

Sorodni članki:

• Kako prikazati ime tabele ali vrtilne tabele v celici v Excelu?
• Kako ohraniti razširljivost tabele z vstavljanjem vrstice tabele v zaščiteni delovni list v Excelu?
• Kako preurediti položaj stolpcev v tabeli v Excelu?
• Kako skriti vrstice z ničelno vrednostjo v vrtilni tabeli?

---

Najboljša orodja za pisarniško produktivnost

Kutools za Excel rešuje večino vaših težav in poveča vašo produktivnost za 80%

• Ponovna uporaba: Hitro vstavite zapletene formule, grafikoni in vse, kar ste že uporabljali; Šifriraj celice z geslom; Ustvari poštni seznam in pošiljanje e-pošte ...
• Vrstica Super Formula (enostavno urejanje več vrstic besedila in formule); Bralna postavitev (enostavno branje in urejanje velikega števila celic); Prilepite v filtrirani obseg...
• Združi celice / vrstice / stolpce brez izgube podatkov; Vsebina razdeljenih celic; Združi podvojene vrstice / stolpce... prepreči podvojene celice; Primerjaj obsege...
• Izberite Duplicate ali Unique Vrstice; Izberite prazne vrstice (vse celice so prazne); Super Find in Fuzzy Find v mnogih delovnih zvezkih; Naključna izbira ...
• Natančna kopija Več celic brez spreminjanja sklica formule; Samodejno ustvarjanje referenc na več listov; Vstavi oznake, Potrditvena polja in še več ...
• Izvleček besedila, Dodaj besedilo, Odstrani po položaju, Odstrani presledek; Ustvari in natisni vmesne seštevke strani Pretvarjanje med vsebino celic in komentarji...
• Super filter (shranite in uporabite sheme filtrov za druge liste); Napredno razvrščanje glede na mesec / teden / dan, pogostost in drugo; Poseben filter s krepko, ležeče ...
• Združite delovne zvezke in delovne liste; Spoji tabele na podlagi ključnih stolpcev; Razdelite podatke na več listov; Paketna pretvorba xls, xlsx in PDF...
• Več kot 300 zmogljivih funkcij. Podpira Office / Excel 2007-2021 in 365. Podpira vse jezike. Enostavna uvedba v vašem podjetju ali organizaciji. 30-dnevna brezplačna preizkusna različica vseh funkcij. 60-dnevna garancija vračila denarja.

Preberite več ... Brezplačen prenos... Nakup ... 

---

Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

• Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
• Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
• Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!

Preberite več ... Brezplačen prenos... Nakup ...