Přejít k hlavnímu obsahu

Jak rychle vložit názvy listů do buněk v aplikaci Excel?

Existuje snadný způsob, jak vložit název aktuálního listu do jedné buňky? Jak vložit do buněk název všech pracovních listů? Tento článek vám přináší složité metody řešení těchto problémů.

Rychle vložte aktuální název listu do buňky s funkcemi

Rychle vložte všechny názvy listů do buněk pomocí VBA

Rychle vložte název aktivního listu pomocí Kutools pro Excel dobrý nápad3

Rychle vložte všechny názvy listů s hypertextovými odkazy do buněk jako index dobrý nápad3


šipka modrá pravá bublina Rychle vložte aktuální název listu do buňky s funkcemi

Stačí zadat vzorec = RIGHT (CELL ("název souboru", D2), LEN (CELL ("název souboru", D2)) - FIND ("]", CELL ("název souboru", D2))) v libovolné buňce a stiskněte vstoupit klíč, zobrazí název aktuálního listu v buňce.
doc-insert-sheets-name-do-cells1

Tento vzorec je schopen zobrazit pouze název aktuálního listu, ale nikoli název jiného listu.


šipka modrá pravá bublina Rychle vložte všechny názvy listů do buněk pomocí VBA

Pokud chcete vložit všechny názvy listů do buněk, je dobrá volba makro VBA.

Krok 1: Podržte stisknuté tlačítko Další + F11 klíče v aplikaci Excel a otevře Microsoft Visual Basic pro aplikace okno.

Krok 2: Klepněte na tlačítko Vložit > Modula vložte následující makro do okna modulu.

VBA pro vkládání názvů všech listů do buněk:

Sub SheetNames ()
Sloupce (1). Vložit
Pro i = 1 Do Sheets.Count
Buňky (i, 1) = Sheets (i) .Name
Příště já
End Sub

Krok 3: Stiskněte tlačítko F5 klíč ke spuštění tohoto makra. Poté budete ve sloupci A aktuálního listu uvedeny názvy všech pracovních listů. Viz snímek obrazovky:
doc-insert-sheets-name-do-cells2

Poznámka: V kódu VBA můžete změnit Buňky (i, 1) do jiného odkazu pro vložení názvů listů začněte u jiných buněk. Například vložte názvy listů od C3, změňte je na Buňky (i + 2, 3).


šipka modrá pravá bublina Rychle vložte název aktivního listu pomocí Kutools pro Excel

Pokud chcete vložit informace o aktivním listu včetně názvu listu, názvu sešitu, cesty k souboru atd. Do buňky nebo záhlaví / zápatí, můžete použít Kutools pro ExcelJe Vložte informace o sešitu.

Kutools pro Excel, s více než 300 užitečné funkce, které vám usnadní práci. 

Po instalace zdarma Kutools pro Excel, prosím, postupujte takto:

1. Vyberte buňku nebo oblast, do které chcete vložit název listu, a klepněte na Kutools Plus > Cvičebnice > Vložte informace o sešitu.doc vložte informace o listu 1

2. Poté vyberte informace o sešitu, ze kterých chcete vložit Informace a zadejte umístění, ze kterého chcete informace umístit Vložte na sekce. Pak klikněte na tlačítko OK.

doc 1

Kliknutím sem získáte další informace o vložení informací o sešitu.

šipka modrá pravá bublina Vložte informace sešitu do buňky / záhlaví / zápatí


šipka modrá pravá bublina Rychle vložte všechny názvy listů s hypertextovými odkazy do buněk jako index

Kutools pro Excel's Vytvořte seznam názvů listů nástroj nejen vloží všechny názvy listů do buněk, ale také vloží hypertextové odkazy na odpovídající listy.

Kutools pro Excel, s více než 300 užitečné funkce, které vám usnadní práci. 

Po instalace zdarma Kutools pro Excel, prosím, postupujte takto:

Krok 1: Klepněte na tlačítko Kutools Plus > Pracovní list > Vytvořte seznam názvů listů.
doc-insert-sheets-name-do-cells3

Krok 2: V Vytvořte seznam názvů listů v dialogovém okně zadejte nastavení podle svých potřeb a klikněte na OK.
doc-insert-sheets-name-do-cells4

Pak uvidíte, že všechny názvy listů jsou vloženy do nového listu a každý název listu odkazuje na odpovídající list. Viz následující screenshoty:

Názvy listů s hypertextovými odkazy
Názvy listů s tlačítky maker
doc-insert-sheets-name-do-cells5
doc-insert-sheets-name-do-cells6

Projekt Vytvořte seznam názvů listů Tento nástroj vám usnadní vytvoření seznamu všech názvů aktivních sešitů v novém listu, který obsahuje hypertextové odkazy nebo tlačítka maker pro rychlou navigaci do jiných listů. Klepnutím získáte další informace o tomto nástroji.

šipka modrá pravá bublina Seznam všech názvů listů s hypertextovými odkazy



Kutools pro Excel: 300+ funkcí, které musíte mít v Excelu, 30denní bezplatná zkušební verze odtud

Snadno kombinujte více listů / sešit do jednoho listu nebo sešitu

Kombinovat vícenásobné listy nebo sešity do jednoho listu nebo sešitu může být v aplikaci Excel náročné, ale s Kombinovat funkce v Kutools pro Excel, můžete kombinovat desítky listů / sešitů do jednoho listu nebo sešitu, také můžete sloučit listy do jednoho pouze několika kliknutími.  Kliknutím získáte 30denní bezplatnou zkušební verzi s plnou výbavou!
kombinovat listy
 
Kutools pro Excel: s více než 300 praktickými doplňky Excel, můžete vyzkoušet bez omezení za 30 dní.

Nejlepší nástroje pro produktivitu v kanceláři

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  Vyvolejte funkce Kutools...
Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více

Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...

Popis


Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
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