Kuidas saada lehtede nimesid VBA abil Microsoft Excelis
Kui soovite teada saada viisi, kuidas saada teile kõik nähtavad lehe nimed, st mitte varjatud.
Selles artiklis õpime, kuidas saada ainult nähtavate lehtede nimed, kasutades VBA -koodi.
Küsimus): Mul on ühes lehes mitu lehte ja ma olen peitnud lehed, mida ma ei taha, et teised näeksid; Ma tahan koodi, mis annab mulle kõigi nähtavate lehtede nime.
Mõelgem, et meil on 5 lehte ja peidame kindla lehe tahtlikult.
Nähtavate lehtede nime saamiseks peame järgima järgmisi samme:
- Klõpsake vahekaarti Arendaja
- Valige koodirühmas Visual Basic
Kopeerige allolev kood standardmoodulisse
Sub VisibleSheets ()
Dim i täisarvuna, j täisarvuna: j = 1
Lahtrid (1, 1). Praegune piirkond. Rakud. Selge
I = 1 lehtedele. Loend
Kui lehed (i). Nähtav = -1 Siis
Lahtrid (j, 1) = lehed (i). Nimi
j = j + 1
Lõpp Kui
Edasi
End Sub
- Koodi esmakordsel käivitamisel saate veeru A kõigi praeguse lehe lehtede nimed
- Kui peidame Jan -lehe, on meil järgmine lehtede nimede loend
Sel viisil saame vba -koodi abil kõigi nähtavate lehtede nime.
Lae alla - Kuidas saada lehtede nimesid vba - xlsm abil