Ga naar hoofdinhoud

Hoe kan ik controleren of een blad in een werkmap bestaat?

Wanneer u tientallen werkbladen of zelfs honderden werkbladen in een werkmap hebt en u wilt zoeken of controleren of er een werkblad in deze werkmap bestaat, kan dit in het algemeen een enorm werk zijn. Nu introduceer ik een VBA-code en een handig hulpmiddel om snel te controleren of een blad in een werkmap bestaat.

Controleer of er een blad bestaat in een werkmap met VBA

Controleer of er een blad bestaat en schakel ernaar over met Kutools voor Excel goed idee 3


Controleer of er een blad in een werkmap bestaat

Volg de onderstaande stappen om de VBA-code te kopiëren en uit te voeren om te controleren of er een blad in de huidige werkmap bestaat.

1. druk op Alt + F11 om de Microsoft Visual Basic voor toepassingen venster.

2. Klik in het venster op Invoegen > Module om een ​​nieuw modulevenster weer te geven en kopieer vervolgens de volgende VBA-code naar het modulevenster.

VBA: controleer of er een blad in een werkmap bestaat.

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 blad en selecteer een lege cel om deze formule te typen = CheckSheet ("Shee1") (Blad1 geeft de bladnaam aan waarvan u wilt controleren of deze bestaat) erin, druk op Enter knop, Juist geeft aan dat dit blad niet bestaat, en TURE geeft aan dat het bestaat in de huidige werkmap.


Controleer of er een blad bestaat en schakel ernaar met Kutools voor Excel met VBA

Met de bovenstaande gedefinieerde functie kunt u gewoon controleren of er een blad bestaat en dat is ook een beetje moeilijk. Met Kutools for Excel, het Navigatievenster geeft een lijst van alle bladnamen voor u, wat ondersteuning biedt om te scrollen om het blad te vinden, of om de bladnaam te filteren om het blad te vinden, en indien nodig kunt u op de bladnaam klikken om snel naar het blad te gaan na het vinden.

Kutools for Excel, met meer dan 300 handige functies, maakt uw werk eenvoudiger. 

Na gratis installeren Kutools voor Excel, doe het als volgt:

1. Schakel de werkmap in waarin u een bladnaam wilt controleren, indien aanwezig, en klik vervolgens op Kutools > Navigatie. Zie screenshot
:doc controleer of er een blad bestaat 1

2. Klik vervolgens in het popping-paneel op Werkboek en blad knop om het paneel uit te vouwen, u kunt alle bladnamen in het paneel zien, u kunt scrollen om de bladnamen te vinden.
doc kutools navigatievenster 2

3. Of je kunt het controleren FILTER knop, typ vervolgens de sleutelwoorden van de bladnaam die u wilt controleren, dan wordt de gespecificeerde bladnaam lijst, klik op de bladnaam, dan gaat het naar het blad.
doc kutools navigatievenster 3

Beste Office-productiviteitstools

Populaire functies: Zoek, markeer of identificeer duplicaten   |  Verwijder lege rijen   |  Combineer kolommen of cellen zonder gegevens te verliezen   |   Ronde zonder formule ...
Super opzoeken: Meerdere criteria VLookup    VLookup met meerdere waarden  |   VOpzoeken over meerdere bladen   |   Fuzzy opzoeken ....
Geavanceerde vervolgkeuzelijst: Maak snel een vervolgkeuzelijst   |  Afhankelijke vervolgkeuzelijst   |  Multi-select vervolgkeuzelijst ....
Kolom Beheerder: Voeg een specifiek aantal kolommen toe  |  Kolommen verplaatsen  |  Schakel de zichtbaarheidsstatus van verborgen kolommen in  |  Vergelijk bereiken en kolommen ...
Uitgelichte functies: Raster focus   |  Ontwerpweergave   |   Grote formulebalk    Werkmap- en bladbeheer   |  resource Library (Auto-tekst)   |  Datumkiezer   |  Combineer werkbladen   |  Cellen coderen/decoderen    Stuur e-mails per lijst   |  Super filter   |   Speciaal filter (filter vet/cursief/doorhalen...) ...
Top 15 gereedschapsets12 Tekst Tools (toe te voegen tekst, Tekens verwijderen, ...)   |   50+ tabel Types (Gantt Chart, ...)   |   40+ Praktisch Formules (Bereken leeftijd op basis van verjaardag, ...)   |   19 Invoeging Tools (QR-code invoegen, Afbeelding invoegen vanaf pad, ...)   |   12 Camper ombouw Tools (Getallen naar woorden, Currency Conversion, ...)   |   7 Samenvoegen en splitsen Tools (Geavanceerd Combineer rijen, Gespleten cellen, ...)   |   ... en meer

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen.  Klik hier om de functie te krijgen die u het meest nodig heeft...

kte tabblad 201905


Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
In the VBA code, if option explicit is set, then the variable "i" will need to be defined
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations