Ga naar hoofdinhoud

Hoe tel je het aantal vellen van een werkmap?

Heeft u er ooit over nagedacht hoe u het aantal werkbladen in een werkmap kunt tellen? Ze een voor een tellen is een saaie klus, als er veel werkbladen zijn. In feite is er geen duidelijke formule om het aantal werkbladen te berekenen. Maar hier kan ik u enkele handige en handige trucs voorstellen om met dit probleem om te gaan.

Tel het aantal vellen in een werkmap SHEETS-functie

Tel het aantal vellen in een werkmap met de opdracht Naam definiëren

Tel het aantal bladen in een werkmap met VBA-code

Toon het aantal bladen in een werkmap in het navigatievenster goed idee 3

Tel het aantal bladen in een werkmap door een lijst met bladen te maken goed idee 3


pijl blauw rechts belTel het aantal vellen in een werkmap SHEETS-functie

Als uw Excel-versie 2013 of later is, kunt u de functie BLADEN gebruiken om het totale aantal bladen van de huidige werkmap te krijgen.

Selecteer een lege cel en typ vervolgens =BLADEN() erin, druk op de Enter-toets om het aantal vellen te krijgen.


pijl blauw rechts belTel het aantal vellen in een werkmap met de opdracht Naam definiëren

In Excel kunt u eerst een formule toepassen op de functie Naam definiëren en vervolgens het aantal werkbladen tellen.

1. Start uw werkmap waarvan u het aantal werkbladen wilt tellen.

2. Klikken Formule > Definieer naam, zie screenshot:

doc-count-aantal-bladen1

3. En in de Nieuwe naam dialoogvenster, geeft u een naam op in het Naam tekstvak en voer deze formule in = GET.WORKBOOK (1) & T (NU ()) aan de Verwijst naar tekstvak, zie screenshot:

doc-count-aantal-bladen1

4. Dan klikken OK om dit dialoogvenster te sluiten en terug te keren naar het werkblad, typ vervolgens deze formule = COUNTA (INDEX (CountSheets, 0))(Telbladen in deze formule is de naam die u in stap 3 hebt gedefinieerd, u kunt deze naar behoefte wijzigen.) in een lege cel, zie screenshot:

doc-count-aantal-bladen1

5. En druk op Enter -toets, u krijgt het nummer van uw werkbladen in de huidige werkmap.

doc-count-aantal-bladen1


pijl blauw rechts belTel het aantal bladen in een werkmap met VBA-code

Als u denkt dat de bovenstaande formules enigszins moeilijk te onthouden zijn, is hier een eenvoudige VBA-code die u ook kan helpen.

1. Houd de ALT + F11 toetsen, en het opent de Microsoft Visual Basic for Applications-venster.

2. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.

VBA-code: tel het aantal bladen in een werkmap

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

3. Druk vervolgens op F5 toets om deze code uit te voeren, en er zal een promptvenster verschijnen om u het totale aantal werkbladen te vertellen zoals in het volgende screenshot wordt getoond:

doc-count-aantal-bladen1


pijl blauw rechts bel Toon het aantal bladen in een werkmap met het navigatiedeelvenster

Als je Kutools for Excel geïnstalleerd, kunt u het aantal bladen in een werkmap uiteraard bekijken met de Navigatie brood.

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

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

1. klikken Kutools > Navigatie om de Navigatie paneel links van het werkblad. Zie screenshot:
doc navigatie 1

2. Dan klikken Werkmap en bladen tabblad, en dan kunt u het totale aantal bladen in de actieve werkmap zien dat onder in het paneel wordt weergegeven, ook kunt u het aantal zichtbare en verborgen bladen van de werkmap bekijken. Zie screenshot:
doc navigatie 2

met Navigatie paneel kunt u schakelen tussen bladen, alle kolomkoppen, bereiknamen weergeven en automatische teksten toevoegen, enzovoort. Klik hier voor meer details.

pijl blauw rechts bel Navigatievenster - Lijst en tel alle bladen


pijl blauw rechts bel Tel het aantal bladen in een werkmap door een lijst met bladen te maken

Als u denkt dat bovenstaande methoden niet handig zijn, kan ik een rondweg voor u introduceren.

Als je hebt geïnstalleerd Kutools for Excel, kunt u een namenlijst van alle werkbladen maken en ze vervolgens selecteren om te tellen in de statusbalk.

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

1. Schakel de werkmap in waarvan u de werkbladen wilt tellen en klik op Koetools Plus > Werkblad > Maak een lijst met bladnamen. Zie screenshot:
doc navigatie 1

2. Vink vervolgens in het popping-dialoogvenster aan Bevat een lijst met hyperlinks optie, en om op een handige manier bladnamen te selecteren, kunt u de bladindex in 3 of 4 kolommen weergeven. Zie screenshot:
documenten tellen 2

3. klikken Ok, dan wordt een werkblad gemaakt met de namen van alle bladen voor alle bladen, en u hoeft alleen deze bladnamen te selecteren en het telresultaat te bekijken op de Status bar.
doc kutools maakt een lijst met bladnamen aan 3

Eigenlijk zijn deze bladnamen koppelbaar, u kunt op één bladnaam klikken en vervolgens snel naar het betreffende blad linken. En met Maak een lijst met bladnamenkunt u door middel van een vinkje koppelbare knoppen van bladnamen maken Bevat knoppen en macro's keuze . Klik hier voor meer informatie over Lijst met bladnamen maken.

pijl blauw rechts bel Maak een lijst met bladnamen



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

goedNavigatievenster - Zoeken en vervangen

Kutools for Excelis geavanceerd Zoeken en vervangen functie, kan u helpen bij het vinden en
vervang een waarde over meerdere bladen en werkmappen.
doc zoeken en vervangen

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 (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