Přejít k hlavnímu obsahu

Jak spočítat počet listů sešitu?

Už jste někdy uvažovali o tom, jak spočítat počet listů v sešitu? Počítat je jeden po druhém je nudná práce, pokud existuje spousta pracovních listů. Ve skutečnosti neexistuje žádný přímý vzorec pro výpočet počtu listů. Ale zde vám mohu představit několik užitečných a užitečných triků, jak tento problém vyřešit.

Spočítat počet listů v sešitu Funkce LISTY

Spočítat počet listů v sešitu pomocí příkazu Definovat název

Počítejte počet listů v sešitu s kódem VBA

Zobrazit počet listů v sešitu podle navigačního podokna dobrý nápad3

Spočítat počet listů v sešitu vytvořením seznamu listů dobrý nápad3


šipka modrá pravá bublinaSpočítat počet listů v sešitu Funkce LISTY

Pokud máte verzi Excelu 2013 nebo novější, můžete pomocí funkce LISTY získat celkový počet listů aktuálního sešitu.

Vyberte prázdnou buňku a zadejte =LISTY() do něj stisknutím klávesy Enter získáte počet listů.


šipka modrá pravá bublinaSpočítat počet listů v sešitu pomocí příkazu Definovat název

V aplikaci Excel můžete nejprve použít vzorec do funkce Definovat název a poté spočítat počet listů.

1. Spusťte sešit, ve kterém chcete spočítat počet listů.

2, klikněte Vzorec > Definujte jméno, viz screenshot:

počet dokumentů-počet-listů1

3. A v Nové jméno v dialogovém okně zadejte název do Příjmení do textového pole a poté zadejte tento vzorec = GET.WORKBOOK (1) & T (HNED ()) k Odkazuje na textové pole, viz screenshot:

počet dokumentů-počet-listů1

4. Pak klikněte na tlačítko OK zavřete toto dialogové okno a vraťte se do listu a zadejte tento vzorec = COUNTA (INDEX (CountSheets, 0))(Počet listů v tomto vzorci je název, který jste definovali v kroku 3, můžete jej změnit podle potřeby.) do prázdné buňky, viz screenshot:

počet dokumentů-počet-listů1

5. A stiskněte vstoupit klíč, získáte počet svých listů v aktuálním sešitu.

počet dokumentů-počet-listů1


šipka modrá pravá bublinaPočítejte počet listů v sešitu s kódem VBA

Pokud si myslíte, že výše uvedené vzorce jsou poněkud těžko zapamatovatelné, může vám pomoci i jednoduchý kód VBA.

1. Podržte ALT + F11 klíče a otevře se Okno Microsoft Visual Basic pro aplikace.

2, klikněte Vložit > Modula vložte následující kód do Okno modulu.

Kód VBA: Spočítejte počet listů v sešitu

Public Sub CountWorkSheets()
'Update 20140326
MsgBox "The total number sheets of this workbook: " & Application.Sheets.Count
End Sub

3. Pak stiskněte tlačítko F5 klíč k provedení tohoto kódu a zobrazí se okno s výzvou, které vám sdělí celkový počet listů, jak je znázorněno na následujícím snímku obrazovky:

počet dokumentů-počet-listů1


šipka modrá pravá bublina Zobrazit počet listů v sešitu pomocí navigačního podokna

Pokud máte Kutools pro Excel nainstalován, můžete samozřejmě zobrazit počet listů v sešitu pomocí Navigace panel.

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. cvaknutí Kutools > Navigace k povolení Navigační panel v levé části listu. Viz screenshot:
navigace v dokumentu 1

2. Pak klikněte na tlačítko Sešit a listy Na kartě a poté můžete zobrazit celkový počet listů v aktivním sešitu, který se zobrazuje ve spodní části podokna, můžete také zobrazit počet viditelných a skrytých listů sešitu. Viz snímek obrazovky:
navigace v dokumentu 2

S Navigace v podokně můžete přepínat mezi listy, zobrazovat všechny záhlaví sloupců, názvy rozsahů a přidávat automatické texty atd. Kliknutím sem získáte další podrobnosti.

šipka modrá pravá bublina Navigační podokno - Seznam a počítání všech listů


šipka modrá pravá bublina Spočítat počet listů v sešitu vytvořením seznamu listů

Pokud si myslíte, že výše uvedené metody nejsou vhodné, mohu vám představit obousměrnou cestu.

Pokud jste nainstalovali Kutools pro Excel, můžete vytvořit seznam názvů všech listů a poté je vybrat na stavovém řádku.

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

1. Povolte sešit, který chcete spočítat, jeho listy, a klepněte na Kutools Plus > Pracovní list > Vytvořte seznam názvů listů. Viz snímek obrazovky:
navigace v dokumentu 1

2. Poté v rozbalovacím dialogu zaškrtněte Obsahuje seznam hypertextových odkazů možnost a pro pohodlný výběr názvů listů můžete zobrazit index listu ve 3 nebo 4 sloupcích. Viz screenshot:
počet listů 2

3. cvaknutí Ok, poté se vytvoří list se jmény všech listů před všemi listy a stačí vybrat tyto názvy listů a zobrazit výsledek počítání na Stav bar.
doc kutools vytvořit seznam jmen listů 3

Ve skutečnosti jsou tyto názvy listů propojitelné, můžete kliknout na jeden název listu a poté rychle odkazovat na relativní list. A s Vytvořte seznam názvů listů, můžete vytvořit propojitelná tlačítka názvů listů zaškrtnutím Obsahuje tlačítka a makra možnost. Kliknutím sem získáte další informace o vytvoření seznamu názvů listů.

šipka modrá pravá bublina Vytvořte seznam názvů listů



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

dobrýNavigační podokno - Najít a nahradit

Kutools pro Excelje pokročilý Najít a nahradit funkce, vám pomůže najít a
nahradit hodnotu napříč více listy a sešity.
doc najít a nahradit

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 (16)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
Thanks!
=Sheets() worked just fine!
Before I thought I must use VBA.
Saved a lot of trouble!
Rated 5 out of 5
This comment was minimized by the moderator on the site
Save the entire workbook in single pdf then u can find easily count the total no of pages.
This comment was minimized by the moderator on the site
I upgraded to Office 365 and now=COUNTA(INDEX(CountSheets,0)) always returns 1. Is there a fix for Excel 365 to get this to work?Thanks,
Jim...
This comment was minimized by the moderator on the site
=SHEETS() in Excel 365 returns 0.
=SHEETS(reference) - so what goes in "reference"?
This comment was minimized by the moderator on the site
Hi, gerland, in my office 365, the defined name method work as well. You can try the SHEETS function, I have updated it as the first one method in this tutorial.
This comment was minimized by the moderator on the site
=Sheets()  gives the answer. 
This comment was minimized by the moderator on the site
=sheets() works great
This comment was minimized by the moderator on the site
It Works only 2010 & Higher Version of Excel. Not Working In Excel 2007
This comment was minimized by the moderator on the site
Tried it on my 2007 version.
=COUNTA(countsheets)
works for me.
This comment was minimized by the moderator on the site
I like it. Thanks too much
This comment was minimized by the moderator on the site
Thank you so much for posting these directions!! I have a workbook with over 700 sheets and never knew there was a way for excel to count them for me. I used the first method and it worked absolutely perfectly!!
This comment was minimized by the moderator on the site
Great! Saved so much of my time!!
This comment was minimized by the moderator on the site
Hi, Thanks! This worked for me great in excel 2013 to count the number of sheets. Crazy that a formula is required to do this.
This comment was minimized by the moderator on the site
Sorry Freddy. Your first method using Formula > Define Name doesn't work. You got a typo somewhere or something
This comment was minimized by the moderator on the site
[quote]Sorry Freddy. Your first method using Formula > Define Name doesn't work. You got a typo somewhere or somethingBy smith[/quote] yes, instead of =COUNTA(INDEX(CountSheets,0)) You should write =COUNTA(INDEX(CountSheets;0))
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