Hvordan få arknavn ved hjelp av VBA i Microsoft Excel
Hvis du vil finne ut en måte som kan gi deg alle navnene på arket som er synlige, dvs. ikke skjult.
I denne artikkelen lærer vi hvordan du bare får navn på de synlige arkene, ved hjelp av VBA -kode.
Spørsmål): Jeg har flere ark i en fil og jeg har gjemt arkene som jeg ikke vil at andre skal se; Jeg vil ha en kode som vil gi meg navnet på alle de synlige arkene.
La oss vurdere at vi har 5 ark, og vi skjuler et bestemt ark med vilje.
For å få navnet på de synlige arkene, må vi følge trinnene nedenfor:
- Klikk på kategorien Utvikler
- Velg Visual Basic fra kodegruppen
Kopier koden nedenfor i standardmodulen
Sub VisibleSheets ()
Dim i As Integer, j As Integer: j = 1
Celler (1, 1) .CurrentRegion.Cells.Clear
For i = 1 Til Sheets.Count
If Sheets (i). Synlig = -1 Da
Celler (j, 1) = Ark (i) .Name
j = j + 1
Slutt om
Neste
Slutt Sub
- Første gang du kjører koden, får du navnene på alle arkene i gjeldende ark i kolonne A
- Hvis vi skjuler Jan -arket, vil vi ha følgende liste over arknavn
På denne måten kan vi få navnet på alle de synlige arkene, ved hjelp av vba -kode.
Last ned - Hvordan få arknavn med vba - xlsm