Recimo, da imate delovni zvezek z več delovnimi listi, zdaj pa želite našteti vsa imena listov v trenutnem delovnem zvezku, ali obstaja kakšen hiter način za ustvarjanje seznama imen listov v Excelu, ne da bi jih vtipkali enega za drugim? Ta vadnica vsebuje navodila za seznam imen delovnih listov v Excelu.

Dinamično dobite seznam vseh imen delovnih listov iz delovnega zvezka s formulami

Pridobite seznam vseh imen delovnih listov iz delovnega zvezka s koristno funkcijo

Pridobite seznam vseh imen delovnih listov iz delovnega zvezka s kodo VBA

Dinamično dobite seznam vseh imen delovnih listov iz delovnega zvezka s formulami

V Excelu lahko določite ime obsega in nato uporabite formulo za seznam vseh imen listov iz trenutnega delovnega zvezka, naredite naslednje:

1. Pojdi na klik Formula > Upravitelj imen, glej posnetek zaslona:

2. v Upravitelj imen pogovorno okno, kliknite Novo gumb, glej posnetek zaslona:

3. V izskočil Novo ime v pogovorno okno določite ime v Ime in nato kopirajte spodnjo formulo v Se nanaša na besedilno polje, glej posnetek zaslona:

=GET.WORKBOOK(1)&T(NOW())

4. Nato kliknite OK > Zapri če želite zapreti pogovorna okna, pojdite na list, na katerem želite navesti vsa imena listov, in nato v prazno celico vnesite naslednjo formulo:

=IFERROR(INDEX(MID(Sheetnames,FIND("]",Sheetnames)+1,255),ROWS($A$2:A2)),"")

Opombe: V zgornji formuli, Imena listov je ime obsega, ki vas zanima v koraku 3.

5. In nato povlecite ročico za polnjenje navzdol do celic, ko so prikazane prazne celice, in zdaj so vsa imena listov trenutne delovne knjige navedena, kot je prikazano spodaj:

6. Če želite ustvariti hiperpovezavo za vsak list, uporabite spodnjo formulo:

=HYPERLINK("#'"&A2&"'!A1","Go To Sheet")

Opombe: V zgornji formuli, A2 je celica, ki vsebuje ime lista, in A1 je celica, v kateri želite, da se nahaja aktivna celica. Če na primer kliknete besedilo hiperpovezave, bo poiskala celico A1 lista.

7. Ko kliknete besedilo hiperpovezave, vas bo pripeljal do tega lista, glejte spodnjo predstavitev:

Pridobite seznam vseh imen delovnih listov iz delovnega zvezka s koristno funkcijo

Z Ustvari seznam imen listov uporabnost dodatka tretje osebe Kutools za Excel, z enim klikom lahko ustvarite seznam imen delovnih listov in povežete vsak delovni list s hiperpovezavo.

Po namestitvi Kutools za Excel, naredite tako:

1. klik Kutools Plus > Delovni list > Ustvari seznam imen listov, glej posnetek zaslona:

2. v Ustvari seznam imen listov v pogovornem oknu navedite naslednje nastavitve:

(1.) Izberite slogi kazala listov po želji lahko imena delovnih listov ustvarite s hiperpovezavami ali z gumbi za makro. (2.) Vnesite imena delovnih listov za kazalo listov. (3.) Določite mesto indeksa delovnega lista. (4.) Določite, koliko stolpcev želite na novem delovnem listu uporabiti za prikaz imen delovnih listov.

3. Po končanih nastavitvah kliknite OK. Vsa imena delovnih listov so s povezavami navedena v novem delovnem listu trenutnega delovnega zvezka. Oglejte si posnetek zaslona:

imena delovnih listov s hiperpovezavami	imena delovnih listov z gumbi makra

Pridobite seznam vseh imen delovnih listov iz delovnega zvezka s kodo VBA

1. Držite tipko ALT + F11 in odpre tipko Microsoft Visual Basic za aplikacije okno.

2. Kliknite Vstavi > Moduliin v mapo prilepite naslednji makro Moduli Okno.

VBA: V novem delovnem listu navedite imena vseh delovnih listov s hiperpovezavami:

Sub CreateIndex()
'updateby Extendoffice
    Dim xAlerts As Boolean
    Dim I  As Long
    Dim xShtIndex As Worksheet
    Dim xSht As Variant
    xAlerts = Application.DisplayAlerts
    Application.DisplayAlerts = False
    On Error Resume Next
    Sheets("Index").Delete
    On Error GoTo 0
    Set xShtIndex = Sheets.Add(Sheets(1))
    xShtIndex.Name = "Index"
    I = 1
    Cells(1, 1).Value = "INDEX"
    For Each xSht In ThisWorkbook.Sheets
        If xSht.Name <> "Index" Then
            I = I + 1
            xShtIndex.Hyperlinks.Add Cells(I, 1), "", "'" & xSht.Name & "'!A1", , xSht.Name
        End If
    Next
    Application.DisplayAlerts = xAlerts
End Sub

3. Pritisnite F5 ključ za zagon tega makra. Zdaj so vsa imena delovnih listov v aktivnem delovnem zvezku navedena v novem delovnem listu z imenom Indeks, imena listov pa so povezana tudi z vsakim listom, glejte sliko zaslona:

Sorodni članki