Come generare un elenco delle tabelle nascoste utilizzando VBA
Puoi rendere invisibili i fogli di una cartella di lavoro con il comando "Formato - Foglio - Nascondi". È quindi ancora possibile accedere al contenuto della tabella utilizzando una formula, ma la tabella non è più visibile.
Se hai bisogno di un elenco di tutti i fogli di lavoro nascosti nella cartella di lavoro attiva, puoi utilizzare la seguente macro:
Elenco secondarioTabelle nascosteOn ()
Dim Table As Worksheet, NewTable As Worksheet
Dim CurrentMappe come cartella di lavoro
Dim i As Integer
Imposta CurrentMappe = ActiveWorkbook
Imposta NeueTabelle = Workbooks.Add.Sheets (1)
Per ogni tabella in CurrentMappe.Worksheets
Se Table.Visible = False Then
io = io + 1
NewTable.Cells (i, 1) .Value = Table.Name
Finisci se
Prossimo tavolo
Fine sottotitolo
La macro scorre tutti i fogli di lavoro e controlla la proprietà Visibile. Se non è soddisfatto, è un foglio di calcolo nascosto. Quindi il nome del foglio viene trasferito nell'elenco.
La macro elenca i nomi di tutti i fogli di lavoro nascosti in una tabella in una nuova cartella di lavoro.
La figura mostra il risultato della macro quando sono presenti tre fogli di lavoro nascosti nella cartella di lavoro attiva: "Nascosto", "Nascosto" e "Invisibile".
Mancia: Se desideri sapere come inserire e avviare macro in Excel, troverai una breve descrizione qui:
www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie-makros-in-excel-ein.html
