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
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
:
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.
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.
Beste Office-productiviteitstools
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...
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!