Hoe controleert u of een werkblad bestaat in een werkmap?
Wanneer uw werkmap tientallen of zelfs honderden werkbladen bevat en u wilt nagaan of een specifiek blad aanwezig is, kost dat doorgaans veel tijd en moeite. Gelukkig kunt u met een eenvoudige VBA-code of een handige tool razendsnel controleren of het betreffende werkblad in de werkmap bestaat.
Controleren of een blad bestaat in een werkmap met VBA
Controleer of een blad bestaat en schakel er direct naar over met Kutools voor Excel 
Controleren of een blad bestaat in een werkmap
Volg de onderstaande stappen om de VBA-code te kopiëren en uit te voeren, zodat u kunt controleren of een werkblad bestaat in het huidige werkboek.
1. Druk op Alt + F11 om het venster Microsoft Visual Basic for Applications weer te geven.
2. Klik in dit venster op Invoegen > Module om een nieuw modulevenster te openen en plak vervolgens de volgende VBA-code in dit venster.
VBA: Controleer of een werkblad bestaat in een werkmap.
Function CheckSheet(pName As String) As Boolean
'Updateby20140617
Dim IsExist As Boolean
IsExist = False
For i = 1 To Application.ActiveWorkbook.Sheets.Count
If Application.ActiveWorkbook.Sheets(i).Name = pName Then
IsExist = True
Exit For
End If
Next
CheckSheet = IsExist
End Function3. Sla deze code op en ga terug naar het werkblad. Selecteer een lege cel en typ de formule =CheckSheet("Shee1") (waarbij "Sheet1" de bladnaam aangeeft die u wilt controleren op aanwezigheid) in die cel. Druk op Enter: FALSE geeft aan dat het blad niet bestaat en TRUE dat het wél bestaat in het huidige werkboek.
Controleren of een blad bestaat en er direct naar overschakelen met Kutools voor Excel met VBA
Met de bovenstaande door de gebruiker gedefinieerde functie kunt u alleen controleren of een werkblad bestaat – wat behoorlijk omslachtig is. Met Kutools voor Excel daarentegen toont Navigatie automatisch een lijst met alle werkbladnamen. U kunt scrollen om het gewenste werkblad te vinden of de lijst filteren op naam. Zodra u het juiste werkblad hebt gevonden, klikt u er direct op om onmiddellijk naar dat blad te schakelen.
Na gratis installerenvan Kutools voor Excel, gaat u als volgt te werk:
1. Zorg dat de werkmap waarin u een bladnaam wilt controleren actief is en klik vervolgens op Kutools > Navigatie. Zie de schermafbeelding:
2. Klik vervolgens in het verschijnende deelvenster op de knop Werkmap en Blad om het deelvenster uit te klappen. U ziet nu alle bladnamen in de namenlijst in het deelvenster en kunt scrollen om de gewenste bladnaam te vinden.
3. Klik op de knop Filteren, typ de trefwoorden van de bladnaam die u wilt zoeken en de specifieke bladnaam verschijnt direct. Klik erop om meteen naar dat blad te gaan.
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