Gå til hovedindhold

Hvordan henvises der til regneark efter indeksnummer i stedet for navn i Excel?

For mange Excel-brugere har de en tendens til sædvanligvis at omdøbe standardnavnet til regnearket til det nødvendige. Men i mange tilfælde skal de referere til regnearket baseret på dets indeksnummer snarere end dets rigtige navn. Hvordan opnås det? Du kan prøve metoden i artiklen.

Reference regneark efter indeksnummer i stedet for navn med brugerdefineret funktion

Reference regneark efter indeksnummer i stedet for navn med brugerdefineret funktion

Gør som følger for at henvise til regneark efter indeksnummer i stedet for navn i Excel.

1. Trykke andre + F11 taster samtidigt for at åbne Microsoft Visual Basic til applikationer vindue.

2. i Microsoft Visual Basic til applikationer vindue, skal du klikke på indsatte > Moduler. Kopier og indsæt derefter nedenstående VBA-kode i modulvinduet.

VBA-kode: Reference regneark efter indeksnummer i Excel

Function SHEETNAME(number As Long) As String
    SHEETNAME = Sheets(number).Name
End Function

3. Tryk på andre + Q taster for at lukke Microsoft Visual Basic til applikationer vindue.

Noter:

1. Hvis du har brug for at henvise til et bestemt arknavn med dets nummer, skal du vælge en tom celle og indtaste formlen = SHEETNAME (1) direkte ind i formellinjen, og tryk derefter på Enter-tasten. Se skærmbillede:

2. Hvis du vil hente en celleværdi fra et regneark baseret på dets indeksnummer, skal du bruge denne formel.

=INDIRECT("'"&SHEETNAME(1) &"'!A1")

3. Og hvis du vil sammenfatte en bestemt kolonne i et regneark baseret på dets indeksnummer, skal du anvende denne formel.

=SUM(INDIRECT("'"&SHEETNAME(1) &"'!C2:C7"))

Relaterede artikler:

Bedste kontorproduktivitetsværktøjer

🤖 Kutools AI Aide: Revolutionér dataanalyse baseret på: Intelligent udførelse   |  Generer kode  |  Opret brugerdefinerede formler  |  Analyser data og generer diagrammer  |  Aktiver Kutools funktioner...
Populære funktioner: Find, fremhæv eller identificer dubletter   |  Slet tomme rækker   |  Kombiner kolonner eller celler uden at miste data   |   Runde uden formel ...
Super opslag: VLookup med flere kriterier  |   Multiple Value VLookup  |   VOpslag på tværs af flere ark   |   Fuzzy Lookup ....
Avanceret rulleliste: Opret hurtigt rulleliste   |  Afhængig rulleliste   |  Multivælg rulleliste ....
Column Manager: Tilføj et bestemt antal kolonner  |  Flyt kolonner  |  Skift synlighedsstatus for skjulte kolonner  |  Sammenlign områder og kolonner ...
Fremhævede funktioner: Grid fokus   |  Designvisning   |   Stor Formel Bar   |  Arbejdsbog & Ark Manager   |  Ressourcebibliotek (Autotekst)   |  Datovælger   |  Kombiner regneark   |  Krypter/Dekrypter celler   |  Send e-mails efter liste   |  Superfilter   |   Specielt filter (filter fed/kursiv/gennemstreget...) ...
Top 15 værktøjssæt:  12 tekst Værktøjer (tilføje tekst, Fjern tegn, ...)   |   50 + Chart Typer (Gantt kort, ...)   |   40+ Praktisk formler (Beregn alder baseret på fødselsdag, ...)   |   19 Indsættelse Værktøjer (Indsæt QR-kode, Indsæt billede fra sti, ...)   |   12 Konvertering Værktøjer (Tal til ord, Valutaomregning, ...)   |   7 Flet og del Værktøjer (Avancerede kombinere rækker, Opdel celler, ...)   |   ... og mere

Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid.  Klik her for at få den funktion, du har mest brug for...

Beskrivelse

Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
Comments (4)
No ratings yet. Be the first to rate!
Corey
Corey
This comment was minimized by the moderator on the site
I've successfully implemented the above VBA and formulas. I'm trying to add an additional function. I would like to SUM the same cells across all sheets (created and not yet created) using the above SHEETNAME VBA, but I can seem to figure out how to assemble the formula to make it work. Any ideas? I've tried the following and minor variants, but excel no longer thinks it a formula. =SUM(INDIRECT("'"&SHEETNAME(4) &"'!R7":"'"&SHEETNAME(5) &"'!R7"))
Reply
0
0
Jork
Jork
This comment was minimized by the moderator on the site
If you use this UDF, I'd suggest Making two changes in bold below, with notes on why.
Function SHEETNAME(number As Long) As StringApplication.Volatile <--------- this makes the function recalculate when you change the sheets name. Otherwise when you change the sheet name it doesn't change unless you perform a manual recalculation.----------
SHEETNAME = Thisworkbook.Sheets(number).Name <------ If you use this function in multiple workbooks, it will only check names of the workbook the function is in. Otherwise this function will potentially call the tab names from other open Workbooks with this formula.-------
End Function
Reply
0
0
john
john     Jork
This comment was minimized by the moderator on the site
Thank you very much for the script and the additions! Exactly what I was looking for without any prior knowledge about VBAs.
Reply
0
0
Kjeld
Kjeld
This comment was minimized by the moderator on the site
Nice solution. Also, referencing cell B4 of the first sheet in another Excel file can be done like this: =INDIRECT("'[other_filename.xlsx]"&SHEETNAME(1) &"'!B4") However note that the file containing the VBA script needs to be stored as a macro file, .xlsm Cheers,
Reply
0
0
There are no comments posted here yet
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations