Følgende to VBA-koder kan hjelpe deg med å liste opp alle regnearknavnene i et nytt regneark eller det aktive regnearket. Vennligst gjør som dette:
1. Klikk Developer > Visual Basic, vil en ny Microsoft Visual Basic for Applications vindu vises (eller du kan trykke på hurtigtasten Alt + F11 for å åpne vinduet), klikk deretter Sett > Modul, og skriv inn følgende kode i modulen:
VBA. Liste regnearknavnene i et nytt regneark som heter "KutoolsforExcel"
Sub ListWorkSheetNamesNewWs () 'Updateby20140624Dim xWs Som WorksheetOn Error Resume NextApplication. DisplayAlerts = FalsexTitleId = "KutoolsforExcel" Application.Sheets (xTitleId) .DeleteApplication.Sheets.Add Application.Sheets (1) Sett xWs = Application.ActiveSheetxWs.Name = xTitleIdFor i = 2 Til Application.Sheets.Count xWs.Range ("A "& (i - 1)) = Application.Sheets (i) .NameNextApplication.DisplayAlerts = TrueEnd Sub VBA: List regnearknavnene i aktive regnearket
Sub ListWorkSheetNames () 'Updateby20140624Dim xWs Som WorksheetSet. xWs = Application.ActiveSheetFor i = 1 Til Application.Sheets.Count xWs.Range ("A" & i) = Application.Sheets (i) .NameNext iEnd Sub 2. Klikk deretter på knappen for å kjøre koden, og alle regneark navnene i aktive arbeidsboken har blitt oppført.
Det over to kodene bare støtte for å lage en liste over alle regneark navn i arbeidsboken, men hvis du ønsker å legge linker til regneark navn, hvordan kunne du gjøre? Følgende metode kan hjelpe deg.
List regnearknavn og link til hvert regneark ved hjelp Kutools for Excel
Med Opprett Liste over Sheet Names nytten av tredjeparts add-in Kutools for Excel er du i stand til å lage en liste over regnearknavn i ett klikk, og link til hvert regneark med hyperkobling
Kutools for Excel. med mer than120 praktiske Excel-tillegg, gratis å prøve uten begrensning i 30 dager. . Få den nå
Etter å ha installert Kutools for Excel, påfør Opprett Liste over Sheet Names verktøy i henhold til fremgangsmåten:
1. Klikk Enterprise > Regneark Verktøy > Opprett Liste over Sheet Names, se skjermbilde:
2. I Opprett Liste over Sheet Names dialogboksen, kan du angi følgende innstillinger:
Velg sheet indeks stiler
du liker, kan du lage regneark navn med hyperkoblinger eller med makroknapper
Angi. regnearknavnene for plate indeksen.
Angi plasseringen av regnearket indeksen.
Angi hvor mye kolonner du vil bruke i det nye regnearket for å vise regnearknavnene.
3. Etter å ha fullført innstillingene, og klikk deretter på OK. Alle regnearknavnene er oppført med koblinger i et nytt regneark for gjeldende arbeidsbok. Se skjermbilde:
regneark navn med hyperkoblinger regneark navn med makroknapper
Klikk for å vite mer om denne funksjonen
.