Ga naar hoofdinhoud

Hoe snel bladnamen in cellen in Excel invoegen?

Auteur: Kelly Laatst gewijzigd: 2020-04-27

Is er een gemakkelijke manier om de naam van het huidige werkblad in één cel in te voegen? Hoe de naam van alle werkbladen in cellen invoegen? Dit artikel geeft je lastige methoden om deze problemen op te lossen.

Voeg snel de huidige bladnaam in een cel met functies in

Voeg snel alle bladnamen in cellen in met VBA

Voeg snel de naam van het actieve blad in met Kutools voor Excel goed idee 3

Voeg snel alle bladnamen met hyperlinks in cellen in als een index goed idee 3


pijl blauw rechts bel Voeg snel de huidige bladnaam in een cel met functies in

Voer gewoon de formule in van = RECHTS (CEL ("bestandsnaam", D2), LEN (CEL ("bestandsnaam", D2)) - FIND ("]", CEL ("bestandsnaam", D2))) in een willekeurige cel en druk op Enter key, het toont de naam van het huidige werkblad in de cel.
doc-insert-sheets-naam-in-cellen1

Deze formule kan alleen de naam van het huidige werkblad weergeven, maar niet de naam van een ander werkblad.


pijl blauw rechts bel Voeg snel alle bladnamen in cellen in met VBA

Als u alle bladnamen in cellen wilt invoegen, is VBA-macro een goede keuze.

Stap 1: Houd de knop ingedrukt anders + F11 toetsen in Excel, en het opent het Microsoft Visual Basic voor toepassingen venster.

Stap 2: klik op Invoegen > Moduleen plak de volgende macro in het modulevenster.

VBA voor het invoegen van alle werkbladennamen in cellen:

Sub SheetNames ()
Kolommen (1). Invoegen
Voor i = 1 naar Sheets.Count
Cellen (i, 1) = Sheets (i) .Name
Volgende i
End Sub

Stap 3: druk op de F5 toets om deze macro uit te voeren. Vervolgens wordt de naam van alle werkbladen weergegeven in kolom A van het huidige werkblad. Zie screenshot:
doc-insert-sheets-naam-in-cellen2

Note: In de VBA-code kunt u wijzigen Cellen (i, 1) naar andere verwijzing om de bladnamen in te voegen, beginnen bij andere cellen. Invoegbladnamen beginnen bijvoorbeeld bij C3, verander dit in Cellen (i + 2, 3).


pijl blauw rechts bel Voeg snel de naam van het actieve blad in met Kutools voor Excel

Als u de informatie van het actieve blad, inclusief bladnaam, werkmapnaam, bestandspad enzovoort, wilt invoegen in een cel of koptekst / voettekst, kunt u dit gebruiken Kutools for Excel's Voeg werkmapinformatie in.

Kutools for Excel, met meer dan 300 handige functies, maakt uw werk eenvoudiger. 

Na gratis installeren Kutools voor Excel, doe het als volgt:

1. Selecteer een cel of bereik om de bladnaam in te plaatsen en klik op Koetools Plus > werkboek > Voeg werkmapinformatie in.doc werkbladinformatie invoegen 1

2. Selecteer vervolgens de werkmapinformatie waaruit u wilt invoegen Informatie sectie en specificeer de locatie waarvandaan u de informatie wilt plaatsen Invoegen op sectie. Dan klikken OK.

doc 1

U kunt hier klikken voor meer informatie over Werkmapinformatie invoegen.

pijl blauw rechts bel Voeg werkmapinformatie in cel / koptekst / voettekst in


pijl blauw rechts bel Voeg snel alle bladnamen met hyperlinks in cellen in als een index

Kutools for Excel's Maak een lijst met bladnamen hulpprogramma voegt niet alleen alle bladnamen in cellen in, maar voegt ook hyperlinks naar overeenkomstige bladen in.

Kutools for Excel, met meer dan 300 handige functies, maakt uw werk eenvoudiger. 

Na gratis installeren Kutools voor Excel, doe het als volgt:

Stap 1: klik op de Koetools Plus > Werkblad > Maak een lijst met bladnamen.
doc-insert-sheets-naam-in-cellen3

Stap 2: In het Maak een lijst met bladnamen dialoogvenster, specificeer de instellingen volgens uw behoeften en klik op OK.
doc-insert-sheets-naam-in-cellen4

Vervolgens ziet u dat alle bladnamen in een nieuw werkblad zijn ingevoegd en dat elke bladnaam naar het bijbehorende werkblad linkt. Zie volgende screenshots:

Werkbladnamen met hyperlinks
Werkbladnamen met macrotoetsen
doc-insert-sheets-naam-in-cellen5
doc-insert-sheets-naam-in-cellen6

De Maak een lijst met bladnamen maakt het u gemakkelijk om een ​​lijst van alle werkbladnamen van de actieve werkmap in een nieuw werkblad te maken, dat hyperlinks of macroknoppen bevat om snel naar andere werkbladen te navigeren. Klik om meer te weten over dit hulpprogramma.

pijl blauw rechts bel Maak een lijst van alle bladnamen met hyperlinks



Kutools for Excel: 300 + functies die u in Excel moet hebben, 30 dagen gratis proefperiode vanaf hier

Combineer eenvoudig meerdere bladen / werkmap in één enkel blad of werkmap

Het combineren van meerdere bladen of werkmappen tot één blad of werkmap kan lastig zijn in Excel, maar met de extensie Combineren functie in Kutools for Excel, kunt u tientallen bladen / werkmappen samenvoegen tot één blad of werkmap, ook kunt u de bladen met slechts enkele klikken in één samenvoegen.  Klik voor een volledige gratis proefperiode van 30 dagen!
combineer bladen
 
Kutools for Excel: met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen.

Beste Office-productiviteitstools

🤖 Kutools AI-assistent: Een revolutie teweegbrengen in de data-analyse op basis van: Intelligente uitvoering   |  Genereer code  |  Aangepaste formules maken  |  Analyseer gegevens en genereer grafieken  |  Roep Kutools-functies aan...
Populaire functies: Zoek, markeer of identificeer duplicaten   |  Verwijder lege rijen   |  Combineer kolommen of cellen zonder gegevens te verliezen   |   Ronde zonder formule ...
Super opzoeken: Meerdere criteria VLookup    VLookup met meerdere waarden  |   VOpzoeken over meerdere bladen   |   Fuzzy opzoeken ....
Geavanceerde vervolgkeuzelijst: Maak snel een vervolgkeuzelijst   |  Afhankelijke vervolgkeuzelijst   |  Multi-select vervolgkeuzelijst ....
Kolom Beheerder: Voeg een specifiek aantal kolommen toe  |  Kolommen verplaatsen  |  Schakel de zichtbaarheidsstatus van verborgen kolommen in  |  Vergelijk bereiken en kolommen ...
Uitgelichte functies: Raster focus   |  Ontwerpweergave   |   Grote formulebalk    Werkmap- en bladbeheer   |  resource Library (Auto-tekst)   |  Datumkiezer   |  Combineer werkbladen   |  Cellen coderen/decoderen    Stuur e-mails per lijst   |  Super filter   |   Speciaal filter (filter vet/cursief/doorhalen...) ...
Top 15 gereedschapsets12 Tekst Tools (toe te voegen tekst, Tekens verwijderen, ...)   |   50+ tabel Types (Gantt Chart, ...)   |   40+ Praktisch Formules (Bereken leeftijd op basis van verjaardag, ...)   |   19 Invoeging Tools (QR-code invoegen, Afbeelding invoegen vanaf pad, ...)   |   12 Camper ombouw Tools (Getallen naar woorden, Currency Conversion, ...)   |   7 Samenvoegen en splitsen Tools (Geavanceerd Combineer rijen, Gespleten cellen, ...)   |   ... en meer

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen.  Klik hier om de functie te krijgen die u het meest nodig heeft...

Omschrijving


Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
Comments (32)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
how to find the sheet name (section name ) when you type employee no. in a cell? A workbook has 15 sheets named as per sections of the department.In each section has 100 employees in range A2:A101with unique employee no. I have a list of 50 employee nos in different sections. In a new work sheet how to find the section name which corresponds to the employee no.
This comment was minimized by the moderator on the site
Hello, Ashley Pereira, please visit this: https://www.extendoffice.com/documents/excel/5335-excel-vlookup-return-sheet-name.html this article may help you.
This comment was minimized by the moderator on the site
How do you get this formula to copy the tabnames into consecutive columns. In other words not vertically but horizontally.
This comment was minimized by the moderator on the site
Change the following:

Cells(i, 1) = Sheets(i).Name
to
Cells(1, i) = Sheets(i).Name

This causes to step columns in same row.
This comment was minimized by the moderator on the site
you can copy the data entered, then paste Transpose, this converts Cols to Rows, and Rows to Cols.
This comment was minimized by the moderator on the site
Just tried now the macro for inserting all the sheet's name in one sheet. Awesome! Thank you very much
This comment was minimized by the moderator on the site
How do you get the VBA to start in a specific cell instead of A1?
This comment was minimized by the moderator on the site
Just add to i like I did below. If you add to i you can start on any row you would like.

Sub GetNames()

For i = 1 To Sheets.Count

Cells(i + 6, 1) = Sheets(i).Name

Next i
End Sub
This comment was minimized by the moderator on the site
Thank u for your supplement.
This comment was minimized by the moderator on the site
You can change the number in Cells(i, 1) = Sheets(i).Name to other to insert the sheet names in other column, for instance, insert start from C1,change Cells(i, 1) = Sheets(i) to Cells(i, 3) = Sheets(i), but this VBA only can insert the sheet names start from the row 1.
This comment was minimized by the moderator on the site
Thanks!! this was was a great help.
This comment was minimized by the moderator on the site
Hi Kindly i want VBA code to insert file name in specific cell. Thanks
This comment was minimized by the moderator on the site
Great site was very helpful. I have different tab names and I get the names in one sheet using your code, but it gives names of all the tab names, is there anyway we can add code to select from certain tab number or something like that.
This comment was minimized by the moderator on the site
I have multiple project sheets database with different tab name and this name is shown in master sheet table. which formula can i give that when i insert new tab it should automatically updated in master table.
This comment was minimized by the moderator on the site
Can anyone help me with this: Create a macro that creates 10 sheets and name them Sheet1 to Sheet10 but using a loop
This comment was minimized by the moderator on the site
Hello, Can you please help me with the simple VBA code. I have a list of Names in Column A. Specific Range - (A2:A251) - Now I need to create new spreadsheets with these names. The names are driven from a different sheet, thus they keep changing. So in short, if I have 10 names today, they might not appear tomorrow. So on the click of button all older spreadsheets (except 1) should be deleted first and then from the names on the column, new ones should get created. Please advice if this is possible to do? Thanks, Manish Gupta
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations