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 Function

3. 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.