Hoe telt u het aantal zichtbare werkbladen in een werkboek?
In een groot werkboek met meerdere werkbladen zijn sommige werkbladen zichtbaar en andere verborgen. In sommige gevallen moet u mogelijk het totale aantal zichtbare werkbladen in het werkboek tellen. Hoe kunt u dit snel doen? Hier introduceer ik enkele trucs om snel het aantal zichtbare werkbladen in een werkboek te tellen.
Aantal zichtbare werkbladen tellen met alleen VBA
Aantal zichtbare werkbladen/verborgen werkbladen/alle werkbladen tellen met Kutools voor Excel 
Aantal zichtbare werkbladen tellen met alleen VBA
In Excel kunt u, in plaats van de zichtbare werkbladen één voor één te tellen, VBA gebruiken om snel het aantal zichtbare werkbladen te tellen.
1. Druk op Alt + F11 om het venster Microsoft Visual Basic for Applications te openen, klik vervolgens op Invoegen > Module om een nieuwe Module te openen.
2. Plak de onderstaande VBA-code in het Module-venster.
VBA: Aantal zichtbare werkbladen van een werkboek tellen
Sub VisibleSheetsCount()
'UpdatebyKutoolsforExcel20150909
Dim xSht As Variant
Dim I As Long
For Each xSht In ActiveWorkbook.Sheets
If xSht.Visible Then I = I + 1
Next
MsgBox I & " sheets are visible", , "Kutools for Excel"
End Sub
3. Klik op de knop Uitvoeren. Er verschijnt een dialoogvenster dat u vertelt hoeveel zichtbare werkbladen er zijn.
Aantal zichtbare werkbladen/verborgen werkbladen/alle werkbladen tellen met Kutools voor Excel
Als u niet bekend bent met VBA, kunt u de Navigatiebalk van Kutools voor Excel gebruiken om snel het aantal zichtbare werkbladen, verborgen werkbladen en alle werkbladen te bekijken.
1. Open het werkboek waarin u het aantal zichtbare werkbladen wilt tellen en klik op Kutools > Navigatie. Zie screenshot:
2. De Navigatiebalk verschijnt aan de linkerkant van het huidige werkblad. Klik op het tabblad Werkboek & Werkblad om naar de sectie Werkboek & Werkblad te gaan. U kunt het aantal zichtbare werkbladen, verborgen werkbladen en alle werkbladen (zowel zichtbare als verborgen) onderaan de balk bekijken. Zie screenshot:
Als u de Navigatiebalk wilt verbergen, klikt u gewoon op Kutools > Navigatie om deze uit te schakelen.
De Navigatiebalk van Kutools voor Excel is krachtig. Met deze functie kunt u de lijst met werkbladen, de lijst met celnamen, de lijst met kolomkoppen bekijken en ook bereiken, afbeeldingen en formules als autoteksten toevoegen. Daarnaast kunt u een woord zoeken en vervangen in geselecteerde werkbladen. Klik hier om meer te weten te komen over de Navigatiebalk.
Kutools voor Excel - Boost Excel met meer dan 300 essentiële tools. Geniet van permanent gratis AI-functies! Nu verkrijgen
Beste productiviteitstools voor Office
Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
- Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen