Kuinka luoda luettelo piilotetuista taulukoista VBA: n avulla
Voit tehdä työkirjan arkit näkymättömiksi komennolla "Muotoile - Arkki - Piilota". Tällöin on edelleen mahdollista käyttää taulukon sisältöä kaavan avulla, mutta taulukko ei ole enää näkyvissä.
Jos tarvitset luettelon kaikista aktiivisen työkirjan piilotetuista laskentataulukoista, voit käyttää seuraavaa makroa:
AlaluetteloPiilotetut taulukot päällä ()
Himmennä taulukko laskentataulukkona, uusi taulukko laskentataulukkona
Dim CurrentMappe Työkirjana
Dim i Kuten kokonaisluku
Aseta CurrentMappe = ActiveWorkbook
Aseta NeueTabelle = Workbooks.Add.Sheets (1)
Jokaiselle CurrentMappe.Worksheets -taulukolle
Jos Table.Visible = False Sitten
i = i + 1
NewTable.Cells (i, 1) .Arvo = Taulukko.Nimi
Loppu Jos
Seuraava taulukko
End Sub
Makro kiertää kaikki laskentataulukot ja tarkistaa ominaisuuden Näkyvä. Jos se ei ole tyytyväinen, se on piilotettu laskentataulukko. Tämän jälkeen taulukon nimi siirretään luetteloon.
Makro luettelee kaikkien piilotettujen laskentataulukoiden nimet uuden työkirjan taulukossa.
Kuvassa näkyy makron tulos, kun aktiivisessa työkirjassa on kolme piilotettua laskentataulukkoa: "Piilotettu", "Piilotettu" ja "Näkymätön".
Vinkki: Jos haluat tietää, miten voit syöttää ja käynnistää makroja Excelissä, löydät lyhyen kuvauksen täältä:
www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie-makros-in-excel-ein.html
