Hoe telt u het aantal zichtbare werkbladen in een werkmap?
In een grote werkmap met meerdere bladen zijn sommige zichtbaar en andere verborgen. Soms wilt u misschien snel weten hoeveel bladen er daadwerkelijk zichtbaar zijn. Hoe telt u dat aantal efficiënt? Hieronder vindt u handige trucs om het aantal zichtbare bladen in een werkmap razendsnel te bepalen.
Alleen het aantal zichtbare bladen tellen met VBA
Aantal zichtbare bladen/verborgen bladen/alle bladen tellen met Kutools voor Excel 
Alleen het aantal zichtbare bladen tellen met VBA
In Excel kunt u in plaats van zichtbare werkbladen één voor één te tellen, VBA gebruiken om het aantal zichtbare werkbladen razendsnel te bepalen.
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 modulevenster.
VBA: Aantal zichtbare bladen van een werkmap 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. Vervolgens verschijnt er een dialoogvenster met het aantal zichtbare bladen.
Aantal zichtbare bladen/verborgen bladen/alle bladen tellen met Kutools voor Excel
Als u niet bekend bent met VBA, kunt u de Navigatie van Kutools voor Excel gebruiken om snel het aantal zichtbare bladen, verborgen bladen en alle bladen te bekijken.
1. Activeer de werkmap waarvan u het aantal zichtbare bladen wilt tellen en klik op Kutools > Navigatie. Zie schermafbeelding:
2. Vervolgens verschijnt de Navigatie aan de linkerkant van het huidige werkblad. Klik op Werkmap en Blad om naar het gedeelte Werkmap en Blad te gaan. Onderaan het deelvenster ziet u het aantal zichtbare bladen, verborgen bladen en alle bladen (zowel zichtbare als verborgen). Zie schermafbeelding:
Als u de navigatie wilt verbergen, klikt u gewoon op Kutools > Navigatie om deze uit te schakelen.
Kutools voor Excel’s Navigatie is krachtig. Hiermee bekijkt u de lijst met werkbladen, de lijst met celnamen en de lijst met kolomkoppen. Daarnaast voegt u bereiken, afbeeldingen en formules toe als automatische teksten en zoekt u een woord in geselecteerde werkbladen.Klik hier voor meer informatie over Navigatie.
Kutools voor Excel– Geef Excel een boost met meer dan 300 essentiële hulpmiddelen, waardoor uw werk sneller en eenvoudiger verloopt, en profiteer van AI-functies voor slimmere gegevensverwerking en productiviteit.Nu verkrijgen
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins