Kako ustvariti seznam skritih tabel z uporabo VBA
Liste delovnega zvezka lahko naredite nevidnimi z ukazom "Oblika - List - Skrij". Do vsebine tabele je še vedno mogoče dostopati s formulo, vendar tabela ni več vidna.
Če potrebujete seznam vseh skritih delovnih listov v aktivnem delovnem zvezku, lahko uporabite naslednji makro:
Sub ListHiddenTablesOn ()
Zatemni tabelo kot delovni list, NewTable kot delovni list
Dim CurrentMappe kot delovni zvezek
Dim i kot celo število
Nastavite CurrentMappe = ActiveWorkbook
Nastavi NeueTabelle = Delovni zvezki.Dodaj liste (1)
Za vsako tabelo v CurrentMappe.Worksheets
Če je Table.Visible = False, potem
i = i + 1
NewTable.Cells (i, 1) .Value = Tabela.Ime
Konec Če
Naslednja miza
End Sub
Makro prehaja skozi vse delovne liste in preverja lastnost Vidno. Če ni zadovoljen, je to skrita preglednica. Nato se ime lista prenese na seznam.
Makro navaja imena vseh skritih delovnih listov v tabeli v novem delovnem zvezku.
Slika prikazuje rezultat makra, ko so v aktivnem delovnem zvezku trije skriti delovni listi: "Skriti", "Skriti" in "Nevidni".
Namig: Če želite vedeti, kako vnesti in zagnati makre v Excelu, boste tukaj našli kratek opis:
www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie-makros-in-excel-ein.html
