Emetti i nomi dei fogli di lavoro in una cartella di lavoro di Excel come elenco

Sommario

Crea un sommario per una cartella di lavoro elencando i nomi di tutti i fogli di lavoro in una cartella di lavoro di Excel

Vuoi ottenere un elenco di tutti i fogli di lavoro in una cartella di lavoro? Quindi usa una macro VBA. La seguente macro crea un nuovo foglio di lavoro nella cartella di lavoro attiva ed elenca i nomi di tutti i fogli uno sotto l'altro in questo foglio di lavoro:

Sottolista Blaetter ()
Dim line As Integer
Dim List come foglio di lavoro
Set List = ActiveWorkbook.Worksheets.Add
Per riga = 1 In ActiveWorkbook.Worksheets.Count
List.Cells (riga, 1) .Value = Fogli di lavoro (riga) .Nome
Riga successiva
Fine sottotitolo

Una volta avviata, la macro genera un elenco dei fogli di lavoro nelle cartelle di lavoro attive. Questo elenco è in un nuovo foglio di lavoro. La figura seguente mostra come può essere il risultato:

Per inserire la macro, premere la combinazione di tasti ALT F11 in Excel. Questo richiama l'editor VBA. Utilizzare il comando INSERT - MODULE per inserire un foglio modulo vuoto. Per avviare la macro, premere la combinazione di tasti ALT F8 all'interno di Excel.

Aiuterete lo sviluppo del sito, condividere la pagina con i tuoi amici

wave wave wave wave wave