Hoe telt u snel het aantal verborgen werkbladen in Excel?
Als u een grote werkmap hebt met honderden werkbladen — waarvan sommige verborgen zijn — en u wilt om specifieke redenen weten hoeveel werkbladen er precies verborgen zijn, hoe doet u dat dan zonder ze één voor één te tellen? Ik deel nu twee slimme trucs waarmee u alle verborgen werkbladen in één keer kunt tellen.
Verborgen bladen tellen met VBA
Verborgen/zichtbare bladen tellen met Kutools voor Excel
Verborgen bladen verwijderen of Alle bladen zichtbaar maken met Kutools voor Excel
Verborgen bladen tellen met VBA
Ik introduceer een VBA-code die een dialoogvenster toont met het aantal verborgen werkbladen in een werkmap.
1. Druk op Alt + F11 om het venster Microsoft Visual Basic for Applications te openen.
2. Klik op Invoegen > Module en plak de onderstaande code in het nieuwe Module-venster.
VBA: Aantal verborgen bladen tellen.
Sub vhCount()
'Updateby20150602
Dim xWs As Worksheet
Dim xCount As Integer
For Each xWs In Application.ActiveWorkbook.Sheets
If xWs.Visible Then xCount = xCount + 1
Next
MsgBox "Visible : " & xCount & vbCrLf & _
"Hidden : " & ActiveWorkbook.Sheets.Count - xCount
End Sub3. Druk op F5 om de code uit te voeren. Er verschijnt een dialoogvenster met het aantal verborgen en zichtbare werkbladen.
Verborgen/zichtbare bladen tellen met Kutools voor Excel
Als u niet bekend bent met VBA, kunt u gratis Kutools voor Excel installeren om in één oogopslag het totale aantal bladen, verborgen bladen en zichtbare bladen te tellen.
Na gratis installatievan Kutools voor Excel, gaat u als volgt te werk:
1. Klik op Kutools > Navigatie om het deelvenster weer te geven. Zie screenshot:
2. Klik vervolgens op Werkmap en Blad om de werkmappen en werkbladen weer te geven. Ga naar de onderkant van het deelvenster — daar ziet u het totale aantal bladen, het aantal verborgen bladen en het aantal zichtbare bladen.
Tip: Als u Navigatie niet meer nodig hebt, klikt u opnieuw op Kutools > Navigatie om het te verbergen.
Verborgen bladen verwijderen of alle verborgen bladen zichtbaar maken met Kutools voor Excel
Met Kutools voor Excel kunt u ook alle verborgen bladen in één klik verwijderen.
1. Als u alle bladen zichtbaar wilt maken, klikt u gewoon op Kutools > Tonen & Verbergen > Alle bladen zichtbaar maken.
2. Als u alle verborgen werkbladen wilt verwijderen, klikt u gewoon op KUTOOLS PLUS > Werkblad > Verwijder alle verborgen werkbladen. Zie screenshot:
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