Získajte názvy hárkov

Anonim

Ako získať názvy hárkov pomocou VBA v programe Microsoft Excel

V prípade, že chcete nájsť spôsob, ako vám získať všetky názvy hárkov, ktoré sú viditeľné, tj. Nie sú skryté.

V tomto článku sa naučíme, ako získať názvy iba viditeľných hárkov pomocou kódu VBA.

Otázka): Mám viacero hárkov v jednom súbore a listy som ukryl, ktoré nechcem, aby ostatní videli; Chcem kód, ktorý mi dá názov všetkých viditeľných listov.

Uvažujme, že máme 5 listov, a zámerne skryjeme konkrétny list.

Aby sme získali názov viditeľných hárkov, musíme postupovať podľa nasledujúcich krokov:

  • Kliknite na kartu Vývojár
  • V skupine Kód vyberte položku Visual Basic

Skopírujte nižšie uvedený kód do štandardného modulu

Podhľadové listy ()

Dim i ako celé číslo, j ako celé číslo: j = 1

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

Pre i = 1 do hárkov. Počítať

Ak hárky (i). Viditeľné = -1 Potom

Bunky (j, 1) = hárky (i). Názov

j = j + 1

Koniec Ak

Ďalšie

Koniec pod

  • Pri prvom spustení kódu získate názvy všetkých hárkov v aktuálnom hárku v stĺpci A

  • Ak skryjeme hárok Jan, budeme mať nasledujúci zoznam názvov hárkov

Takýmto spôsobom môžeme získať názov všetkých viditeľných hárkov pomocou kódu vba.

Stiahnuť - Ako získať názvy hárkov pomocou vba - xlsm