Ugrás a tartalomra

Hogyan lehet megszámolni a munkafüzet lapjainak számát?

Gondolt már arra, hogyan számolja meg a munkalapok számát egy munkafüzetben? Egyenként számolni őket unalmas munka, ha sok munkalap van. Valójában nincs egyenes képlet a munkalapok számának kiszámításához. De itt bemutathatok néhány hasznos és praktikus trükköt a probléma kezelésére.

Számolja meg a lapok számát egy munkafüzet LAPOK függvényében

Számolja meg a munkafüzet lapjainak számát a Define Name paranccsal

Számolja meg a VBA kóddal ellátott munkafüzet lapjainak számát

Mutassa meg a munkafüzet lapjainak számát a Navigációs panel szerint jó ötlet3

Számolja össze a munkafüzet lapjainak számát a lista létrehozásával jó ötlet3


nyíl kék jobb buborékSzámolja meg a lapok számát egy munkafüzet LAPOK függvényében

Ha az Excel verziója 2013-as vagy újabb, akkor a LAPOK funkcióval lekérheti az aktuális munkafüzet lapjainak teljes számát.

Jelöljön ki egy üres cellát, majd írja be =LAPOK() be, nyomja meg az Enter billentyűt a lapok számának megtekintéséhez.


nyíl kék jobb buborékSzámolja meg a munkafüzet lapjainak számát a Define Name paranccsal

Az Excel programban először alkalmazhat egy képletet a Név meghatározása szolgáltatásba, majd megszámolja a munkalapok számát.

1. Indítsa el a munkafüzetet, amelyben meg szeretné számlálni a munkalapok számát.

2. Kattints Képlet > Definiálja a nevet, lásd a képernyőképet:

doc-count-of-lapok száma1

3. És a Új név párbeszédpanelen adjon meg egy nevet a Név szövegmezőbe, majd írja be ezt a képletet = GET.MUNKAKÖNYV (1) & T (MOST ()) hoz Utal rá szövegmező, lásd a képernyőképet:

doc-count-of-lapok száma1

4. Ezután kattintson OK ennek a párbeszédpanelnek a bezárásához és a munkalapra való visszatéréshez írja be ezt a képletet = COUNTA (INDEX (CountSheets, 0))(CountSheets ebben a képletben az a név, amelyet a 3. lépésben definiált, szükség szerint megváltoztathatja.) üres cellává, lásd a képernyőképet:

doc-count-of-lapok száma1

5. És nyomja meg belép kulcs, akkor az aktuális munkafüzetben megkapja a munkalapok számát.

doc-count-of-lapok száma1


nyíl kék jobb buborékSzámolja meg a VBA kóddal ellátott munkafüzet lapjainak számát

Ha úgy gondolja, hogy a fenti képleteket kissé nehéz megjegyezni, itt egy egyszerű VBA-kód is segíthet.

1. Tartsa lenyomva a ALT + F11 gombokat, és ez megnyitja a Microsoft Visual Basic for Applications ablak.

2. Kattints betétlap > Modulok, és illessze be a következő kódot a Modul ablak.

VBA kód: Számolja meg a munkafüzet lapjainak számát

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

3. Ezután nyomja meg a gombot F5 gombot a kód végrehajtásához, és megjelenik egy felszólító mező, amely megadja a munkalapok teljes számát a következő képernyőkép szerint:

doc-count-of-lapok száma1


nyíl kék jobb buborék Mutassa meg a lapok számát egy munkafüzetben a Navigációs ablaktáblával

Ha van Kutools az Excel számára telepítve, nyilvánvalóan megtekintheti a munkafüzet lapjainak számát a Navigáció ablaktábla.

Kutools az Excel számára, Több mint 300 a praktikus funkciók megkönnyítik a munkáját. 

Után ingyenes telepítés Kutools for Excel, kérjük, tegye a következőket:

1. kettyenés Kutools > Navigáció hogy engedélyezze a Navigációs ablak a munkalap bal oldalán. Lásd a képernyőképet:
doc navigáció 1

2. Ezután kattintson Munkafüzet és lapok lapon, majd megtekintheti az ablaktábla alján az aktív munkafüzet összes lapszámát, valamint megtekintheti a munkafüzet látható és elrejtett lapjainak számát is. Lásd a képernyőképet:
doc navigáció 2

A Navigáció ablaktáblán válthat a lapok között, megjelenítheti az összes oszlopfejlécet, tartománynevet, és hozzáadhat automatikus szövegeket stb. Kattintson ide további részletekért.

nyíl kék jobb buborék Navigációs panel - Az összes lap felsorolása és megszámlálása


nyíl kék jobb buborék Számolja össze a munkafüzet lapjainak számát a lista létrehozásával

Ha úgy gondolja, hogy a fenti módszerek nem megfelelőek, bemutathatok egy kört az Ön számára.

Ha telepítve van Kutools az Excel számára, létrehozhat egy névjegyzéket az összes munkalapról, majd kiválaszthatja őket az állapotsorban számolni.

Után ingyenes telepítés Kutools for Excel, kérjük, tegye a következőket:

1. Engedélyezze a munkafüzetet, amelyben meg szeretné számlálni a munkalapokat, majd kattintson a gombra Kutools Plus > Munkalap > Létrehozza a munkalapok listáját. Lásd a képernyőképet:
doc navigáció 1

2. Ezután a felbukkanó párbeszédpanelen ellenőrizze A hiperhivatkozások listáját tartalmazza opciót, és a lapnevek konszenzív kiválasztásához megadhatja a lapindexet 3 vagy 4 oszlopban. Lásd a képernyőképet:
doki számláló lapok 2

3. kettyenés Ok, akkor egy munkalap jön létre az összes lap nevével az összes lap előtt, és csak ki kell választania ezeket a lapneveket, és meg kell tekintenie a számlálási eredményt a Állapot bar.
doc kutools létrehozza a lapnevek listáját 3

Valójában ezek a lapnevek összekapcsolhatók, rákattinthat egy lap nevére, majd gyorsan hivatkozhat a relatív lapra. És azzal Létrehozza a munkalapok listáját, ellenőrzéssel létrehozhat összekapcsolható gombokat a lapok nevéből Gombokat és makrókat tartalmaz választási lehetőség . Kattintson ide, ha többet szeretne megtudni a Lapnevek listájának létrehozásáról.

nyíl kék jobb buborék Készítse el a Lapnevek listáját



Kutools for Excel: 300+ funkció, amivel rendelkeznie kell az Excelben, 30 napos ingyenes próba innen

jóNavigációs panel - Megtalálás és csere

Kutools az Excel számáraelőrehaladott Keresés és csere funkció, segíthet megtalálni és
cserélje ki az értéket több lapon és munkafüzeten.
doc megkeresi és kicseréli

A legjobb irodai hatékonyságnövelő eszközök

Népszerű szolgáltatások: Ismétlődések keresése, kiemelése vagy azonosítása   |  Üres sorok törlése   |  Oszlopok vagy cellák kombinálása adatvesztés nélkül   |   Kerek Formula nélkül ...
Szuper keresés: Több kritérium VLookup    Többértékű VLookup  |   VLookup több munkalapon   |   Fuzzy Lookup ....
Speciális legördülő lista: Gyors legördülő lista létrehozása   |  Függő legördülő lista   |  Többszörösen válassza ki a legördülő listát ....
Oszlopkezelő: Adjon meg egy adott számú oszlopot  |  Oszlopok mozgatása  |  Kapcsolja be a Rejtett oszlopok láthatósági állapotát  |  Tartományok és oszlopok összehasonlítása ...
Kiemelt funkciók: Rács fókusz   |  Design nézet   |   Nagy Formula bár    Munkafüzet és lapkezelő   |  Erőforrás-könyvtár (Auto szöveg)   |  Dátumválasztó   |  Kombinálja a munkalapokat   |  Cellák titkosítása/dekódolása    E-mailek küldése listánként   |  Szuper szűrő   |   Speciális szűrő (félkövér/dőlt/áthúzott szűrés...) ...
A 15 legjobb eszközkészlet12 szöveg Eszközök (Szöveg hozzáadása, Karakterek eltávolítása,...)   |   50 + Táblázatos Típusai (Gantt-diagram,...)   |   40+ Praktikus képletek (Számolja ki az életkort a születésnap alapján,...)   |   19 beszúrás Eszközök (Helyezze be a QR-kódot, Kép beszúrása az útvonalból,...)   |   12 Átalakítás Eszközök (Számok szavakig, Valuta átváltás,...)   |   7 Egyesítés és felosztás Eszközök (Haladó kombinált sorok, Hasított sejtek,...)   |   ... és több

Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz.  Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...

kte lap 201905


Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
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