Hoe controleer je of een werkblad bestaat in een werkboek?
Wanneer je tientallen werkbladen, of zelfs honderden werkbladen in een werkboek hebt, en je wilt zoeken of controleren of een bepaald werkblad bestaat in dit werkboek, kan dit in het algemeen een enorme klus zijn. Nu introduceer ik een VBA-code en een handig hulpmiddel om snel te controleren of een werkblad bestaat in een werkboek.
Controleer of een werkblad bestaat in een werkboek met VBA
Controleer of een werkblad bestaat en schakel naar het met Kutools voor Excel 
Controleer of een werkblad bestaat in een werkboek
Volg de onderstaande stappen om de VBA-code te kopiëren en uit te voeren om te controleren of een werkblad bestaat in het huidige werkboek.
1. Druk op Alt + F11 om het Microsoft Visual Basic for Applications-venster weer te geven.
2. Klik in het venster op Invoegen > Module om een nieuw modulevenster te openen, kopieer vervolgens de volgende VBA-code naar het modulevenster.
VBA: Controleer of een werkblad bestaat in een werkboek.
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, ga terug naar het werkblad en selecteer een lege cel om deze formule =CheckSheet(“Blad1”) (Blad1 staat voor de naam van het werkblad dat je wilt controleren) in te voeren, druk op Enter. Nee geeft aan dat dit werkblad niet bestaat, en Ja geeft aan dat het bestaat in het huidige werkboek.
Controleer of een werkblad bestaat en schakel naar het met Kutools voor Excel met VBA
Met bovenstaande gedefinieerde functie kun je alleen controleren of een werkblad bestaat, wat ook een beetje lastig is. Met Kutools voor Excel echter, toont het navigatiepaneel alle werkbladnamen voor je, waarbij je kunt scrollen om het werkblad te vinden, of de werkbladnaam filteren om het werkblad te vinden. Als je wilt, kun je op de werkbladnaam klikken om snel naar het werkblad te schakelen nadat je het hebt gevonden.
Na het gratis installeren van Kutools voor Excel, doe dan het volgende:
1. Activeer het werkboek waarin je wilt controleren of een werkbladnaam bestaat, en klik vervolgens op Kutools > Navigatie. Zie screenshot
:
2. Klik vervolgens in het pop-upvenster op Werkboek & Werkblad knop om het paneel uit te vouwen, je kunt alle werkbladnamen in het paneel zien, je kunt scrollen om de werkbladnamen te vinden.
3. Of je kunt Filter aanklikken, typ vervolgens de zoekwoorden van de werkbladnaam die je wilt controleren, en de gespecificeerde werkbladnaam wordt weergegeven. Klik op de werkbladnaam, en het schakelt naar het werkblad.
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