Kako generirati popis skrivenih tablica pomoću VBA
Listove radne knjige možete učiniti nevidljivima naredbom "Format - List - Sakrij". Tada je još uvijek moguće pristupiti sadržaju tablice pomoću formule, ali tablica više nije vidljiva.
Ako vam je potreban popis svih skrivenih radnih listova u aktivnoj radnoj knjizi, možete upotrijebiti sljedeću makronaredbu:
PodpopisHiddenTablesOn ()
Zatamni tablicu kao radni list, novu tablicu kao radni list
Dim CurrentMappe kao radna knjiga
Dim i Kao cijeli broj
Postavi CurrentMappe = ActiveWorkbook
Postavi NeueTabelle = Radne knjige.Dodaj tablice (1)
Za svaku tablicu u CurrentMappe.Radni listovi
Ako je tablica.vidljiva = lažna tada
i = i + 1
NewTable.Cells (i, 1) .Varue = Table.Name
Završi ako
Sljedeća tablica
Kraj podm
Makro prolazi kroz sve radne listove i provjerava svojstvo Vidljivo. Ako nije zadovoljan, radi se o skrivenoj tablici. Zatim se naziv lista prenosi na popis.
Makronaredba navodi nazive svih skrivenih radnih listova u tablici u novoj radnoj knjizi.
Slika prikazuje rezultat makronaredbe kada u aktivnoj radnoj knjizi postoje tri skrivena radna lista: "Skriveno", "Skriveno" i "Nevidljivo".
Savjet: Ako želite znati kako unijeti i pokrenuti makronaredbe u Excelu, ovdje ćete pronaći kratak opis:
www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie-makros-in-excel-ein.html
