Bladnamen verkrijgen met VBA in Microsoft Excel
Als u een manier wilt vinden om alle namen van het blad te krijgen die zichtbaar zijn, d.w.z. niet verborgen.
In dit artikel zullen we leren hoe we alleen de namen van de zichtbare bladen kunnen krijgen met behulp van VBA-code.
Vraag): Ik heb meerdere bladen in één bestand en ik heb de bladen verborgen waarvan ik niet wil dat anderen ze zien; Ik wil een code die me de naam geeft van alle zichtbare bladen.
Laten we aannemen dat we 5 bladen hebben en dat we opzettelijk een bepaald blad verbergen.
Om de naam van de zichtbare bladen te krijgen, moeten we de onderstaande stappen volgen:
- Klik op het tabblad Ontwikkelaar
- Selecteer in de codegroep Visual Basic
Kopieer onderstaande code in de standaard module
Sub Zichtbare Bladen()
Dim i als geheel getal, j als geheel getal: j = 1
Cellen (1, 1). Huidig gebied. Cellen. Wissen
Voor i = 1 tot vellen. Tellen
Als Bladen (i). Zichtbaar = -1 Dan
Cellen(j, 1) = Bladen(i).Naam
j = j + 1
Stop als
Volgende
Einde sub
- De eerste keer dat u de code uitvoert, krijgt u de namen van alle bladen in het huidige blad in kolom A
- Als we het Jan-blad verbergen, hebben we de volgende lijst met bladnamen
Op deze manier kunnen we de naam van alle zichtbare bladen krijgen, met behulp van vba-code.
Download - Hoe bladnamen te krijgen met vba - xlsm