Skaffa bladnamn

Innehållsförteckning

Så här får du bladnamn med VBA i Microsoft Excel

Om du vill ta reda på ett sätt som kan ge dig alla namn på arket som är synliga, dvs inte dolda.

I den här artikeln kommer vi att lära oss hur man bara får namn på de synliga arken med VBA -kod.

Fråga): Jag har flera ark i en fil och jag har gömt arken som jag inte vill att andra ska se; Jag vill ha en kod som ger mig namnet på alla synliga blad.

Låt oss överväga att vi har 5 ark och vi döljer avsiktligt ett visst ark.

För att få namnet på de synliga arken måste vi följa stegen nedan:

  • Klicka på fliken Utvecklare
  • Välj Visual Basic i kodgruppen

Kopiera koden nedan i standardmodulen

Sub VisibleSheets ()

Dim i Som heltal, j Som heltal: j = 1

Celler (1, 1) .CurrentRegion.Cells.Clear

För i = 1 till Sheets.Count

If Sheets (i). Visible = -1 Then

Celler (j, 1) = Sheets (i) .Name

j = j + 1

Avsluta om

Nästa

Avsluta Sub

  • Första gången du kör koden får du namnen på alla blad i det aktuella bladet i kolumn A

  • Om vi ​​gömmer Jan -bladet kommer vi att ha följande lista med bladnamn

På så sätt kan vi få namnet på alla synliga blad, med hjälp av vba -kod.

Ladda ner - Hur man får bladnamn med vba - xlsm

Du kommer att bidra till utvecklingen av webbplatsen, dela sidan med dina vänner

wave wave wave wave wave