Hvis du har en Excel-arbeidsbok som har hundrevis av regneark, og nå vil du få en liste over alle regnearknavnene, kan du referere til denne artikkelen. Her vil vi dele 3 enkle metoder med deg.
Noen ganger kan du bli bedt om å generere en liste over alle regnearknavnene i en Excel-arbeidsbok. Hvis det bare er noen få ark, kan du bare bruke metode 1 for å liste arknavnene manuelt. Men i tilfelle Excel-arbeidsboken inneholder et stort antall regneark, bør du bruke de to sistnevnte metodene, som er mye mer effektive.
Metode 1: Få liste manuelt
- Først åpner du den spesifikke Excel-arbeidsboken.
- Dobbeltklikk deretter på et arks navn i arklisten nederst.
- Trykk deretter "Ctrl + C" for å kopiere navnet.
- Lag en tekstfil senere.
- Trykk deretter "Ctrl + V" for å lime inn arknavnet.
- Nå, på denne måten, kan du kopiere hvert arks navn til tekstfilen en etter en.
Metode 2: List med formel
- I begynnelsen, gå til "Formler"-fanen og klikk på "Navnebehandling"-knappen.
- Klikk deretter "Ny" i popup-vinduet.
- I den påfølgende dialogboksen skriver du inn "ListSheets" i "Name"-feltet.
- Senere, i "Refererer til"-feltet, skriv inn følgende formel:
=REPLACE(GET.ARBEIDSBOK(1),1,FINN("]",GET.ARBEIDSBOK(1)),"")
- Klikk deretter "OK" og "Lukk" for å lagre denne formelen.
- Deretter oppretter du et nytt regneark i gjeldende arbeidsbok.
- Skriv deretter inn "1" i celle A1 og "2" i celle A2.
- Etterpå velger du de to cellene og drar dem ned for å skrive inn 2,3,4,5 osv. i kolonne A.
- Senere setter du følgende formel i celle B1.
=INDEKS(Listeark,A1)
- Med en gang vil det første arknavnet bli lagt inn i celle B1.
- Til slutt, bare kopier formelen ned til du ser "#REF!" feil.
Metode 3: Liste via Excel VBA
- For somtart, utløs Excel VBA-editor i henhold til "Hvordan kjøre VBA-kode i Excel".
- Deretter legger du følgende kode inn i en modul eller et prosjekt.
Sub ListSheetNamesInNewWorkbook() Dim objNewWorkbook As Workbook Dim objNewWorksheet As Worksheet Set objNewWorkbook = Excel.Application.Workbooks.Add Set objNewWorksheet = objNewWorkbook.Sheets(1) For i = 1 To ThisWork.Counterbook.SellWorksi i objNewWorksheet.Cells(i, 1) = ThisWorkbook.Sheets(i).Navn Neste i Med objNewWorksheet .Rows(2).Sett inn .Cells(1, 1) = "INDEX" .Cells(1, 1).Font. Fet = True .Cells(1, 1) = "NAME" .Cells(2, 1).Fet.Fet = True .Columns("A:B").Autotilpass slutt med sluttunder
- Senere, trykk "F5" for å kjøre denne makroen akkurat nå.
- Med en gang vil en ny Excel-arbeidsbok dukke opp, der du kan se listen over regnearknavn for kilden til Excel-arbeidsboken.
Sammenligning
| Fordeler | Ulemper | |
| Metode 1 | Enkel å betjene | For plagsomt hvis det er mange arbeidsark |
| Metode 2 | Enkel å betjene | Krever at du skriver inn indeksen først |
| Metode 3 | Rask og praktisk | Brukere bør passe seg for de eksterne skadelige makroene |
| Enkelt selv for VBA-nybegynnere |
Excel blir ødelagt
MS Excel er kjent for å krasje fra tid til annen, og dermed skade gjeldende filer ved lagring. Derfor er det sterkt anbefalt å få tak i en ekstern kraftig Excel reparasjon verktøy, for eksempel DataNumen Outlook Repair. Det er fordi den selvgjenopprettingsfunksjonen i Excel har vist seg å mislykkes ofte.
Forfatterintroduksjon:
Shirley Zhang er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologier, inkludert sql fikse og Outlook-reparasjonsprodukter. For mer informasjon besøk www.datanumen. Med
du sparte meg for mye tid, hurra!
Nevím, ale mně metode č. 2 nefunguje – píše, že ve vzorci je chyba.
Metode 2 fungerte utmerket. Så enkelt og raskt.
Hvis du vil se navnene på fanen og ikke lagre den i en fil, følg trinnene nevnt nedenfor:
Trinn 1: Hold musen på enten "venstre tabulatorskift"-ikonet (representert med symbol).
Trinn 2: Trykk på "Ctrl"-knappen og høyreklikk museknappen.
Trinn 3: Du vil se alle "fanenavnene" med en popup-meny overskriften "Aktiver"
Hvis du bare vil se navnene på fanene, følg de tre enkle trinnene som er nevnt nedenfor:
Trinn 1: Hold musen på enten "venstre tabulatorskift"-ikonet (representert med symbol).
Trinn 2: Trykk på "Ctrl"-knappen og høyreklikk museknappen.
Trinn 3: Du vil se alle "fanenavnene" med en popup-meny overskriften "Aktiver"
Fungerte som en sjarm. Takk skal du ha.
Wow, fantastisk bloggstruktur! Hvor lenge har du blogget?
du gjør det enkelt å drive blogg. Hele utseendet på nettstedet ditt er flott, enn si innholdet!
Du kan se lignende her e-handel
Jeg har tenkt og har fjernet meldingen
For metode #2, ved å bruke ListSheets-makroen (=REPLACE(GET.WORKBOOK(1),1,FIND(“]”,GET.WORKBOOK(1)),””)), fant noen en måte å tvinge gjen- beregning? Jeg kan endre et arknavn, men inntil jeg sletter celleinnholdet og skriver inn =INDEX(ListSheets,[RefCell]) formelen på nytt, forblir det gamle arknavnet i resultatet.
Jeg så ikke et svar til andre som posted spørsmål, men jeg møtte #BLOCKED! feil etter lukking av Excel og gjenåpning av filen med denne makroen. Jeg trengte å gjøre filkatalogen der den er lagret til en klarert plassering.
Ekstraordinært!!!!
Fungerte kjempebra og enkelt med formelmetoden. Fantastisk. Takk skal du ha!
Elsker deg for dette!
Vi vil gjerne takke deg nok en gang for de fantastiske ideene du ga Janet da hun utarbeidet sin egen sost-utdannet forskning
pluss, most viktigere, angående å gi alle ideene i en blogg sost.
Forutsatt at vi hadde vært klar over nettstedet ditt for et år siden, kan vi ha blitt reddet
fra de unyttige tiltakene vi tok i bruk.
Tusen takk. leker for voksne
Vi er en gruppe frivillige og åpner en ny ordning i samfunnet vårt.
Nettstedet ditt ga oss verdifull informasjon å jobbe med. Du har gjort en formidabel jobb
og hele samfunnet vårt vil være deg takknemlig.
donere for Ukraina
Utmerket, for en blogg det er! Denne nettsiden gir nyttige data til
oss, fortsett med det. donere for Ukraina
Vær så snill å jobb krna sikha dain
Takk for dette. For å lagre et trinn brukte jeg funksjonen:
=INDEKS(Listeark,RAD(A1))
og kopierte det ned. På den måten trenger jeg ikke en kolonne for å inneholde tallene 1 til n
Metode 3 fungerer som en sjarm. Er det noen som vet hvordan man endrer VBA-koden for å lage et regneark i den eksisterende arbeidsboken for å vise listen over regnearknavn?
Jeg elsker bloggen din.. veldig fine farger & tema. Laget du denne nettsiden selv eller ansatt noen til å gjøre det for deg? Vennligst svar da jeg ønsker å designe min egen blogg og vil gjerne finne ut hvor du har dette fra. Takk så mye
大変参考になりました、ありがとう。
HVA ER MITT FILNAVNET ER VELDIG LANGT? SI DET ER NUMERISK OG 24 SIFFER LANG.. JEG FANT VED Å BRUKE DENNE FORMELEN BARE DE FØRSTE 12 SIFRENE I ARBEIDSARKENE BLIR FANGET
Takk skal du ha. Metode 2 var akkurat det jeg trengte 🙂
Hvis jeg endrer et arknavn, oppdaterer jeg ikke, og celler som refereres til det får en #REF! feil. Hvordan løse uten makro? Takk.
o.web20.tjenester
Tusen takk - akkurat det jeg trengte.
Tusen takk!!! Ekstremt nyttig
Thanks a lot!
Med de nye O365-funksjonene kan du direkte bruke =TRANSPOSE(ListSheets).
Hvis du også ønsker/trenger arknumrene, er =SEQUENCE(COLUMNS(ListSheets)) til og med dynamisk.
takk, metode 3 sparte meg for noen timer med ctr-C/ctr-V
Tusen takk for at du deler disse tre alternativene. Jeg er uenig med brukeren som refererte til sost som "idiotisk". Det er veldig lett å kritisere, men krever virkelig innsats for å hjelpe andre. Takk for hjelpen!
dette er idiotisk - bare gjør en freaking PDF fra excel-filen – du får navnene og en PDF av hver.
Metode to fungerte som en sjarm, takk
Hvordan får jeg den til å lage/oppdatere en fane i gjeldende arbeidsbok i stedet for å lage en ny arbeidsbok?
Rått! Metode to fungerte utmerket. Instruksjonene var klare og skjermbilder var nyttige. Blir ikke bedre.
Jeg får også #BLOKKERT! feilmelding for alternativ 2 og jeg finner ikke en måte å "oppheve blokkeringen" 🙁
Takk, sparte meg for mye arbeid
Metode 2 fungerer ikke i Excel 2021!
Bare en kommentarmetode 2 krever ikke en liste først hvis du erstatter =INDEX(ListSheets,A1) med =INDEX(ListSheets,Row(A1)).
Metode 2 krever også at du lagrer som makroaktivert arbeidsbok da den bruker eldre funksjoner i Excel 4.0
Virkelig satt pris på. Så raskt å bruke VBA fra "lav kunnskap"!
Takk, hvordan gjør jeg resultatene i min nåværende fil på fanen "Tab Index" som allerede eksisterer, enda bedre til en tabell?
Det var råkult!! Takk for VBA-koden!!!!!! Sparte meg som en time med sinnslidende arbeid!
Jeg får en feilmelding #BLOKKERT! når jeg prøver metode 2 (liste med formel). Jeg vil bruke arknavnet i arbeidsboken min, så VBA-metoden er ingen hjelp.
Hei, List via Excel VBA fungerer bra, vennligst foreslå hva du skal endre koden for å få dentart i rad4, kolonne B (indeks i B4, navn i C4)
Takk skal du ha! Dette sparte så mye tid for meg, jeg setter stor pris på at du deler dette med alle!
BTW, er det en måte å skrive ut bare de synlige regnearkene (og ikke de skjulte)? Jeg vet at jeg ber om mye her, men det kan gjøre formelen enda bedre 🙂
Gratulerer og tusen takk!!!
Takk for den makroen! Det fungerte som en sjarm
Dette er utrolig. Tusen takk for sost! Du sparte meg for timer med arbeid.