Recupero del foglio di lavoro Nomi

Se si dispone di un gran numero di fogli di lavoro in una cartella di lavoro, si potrebbe desiderare di recuperare i nomi di quei fogli di lavoro e mettere poi sul proprio foglio di lavoro. Ad esempio, è possibile che si desidera in un unico luogo in modo da poterli utilizzare in un indice o in qualche altro modo. La seguente macro, GetSheets, recupererà rapidamente i nomi dei fogli di lavoro nella cartella di lavoro corrente e metterle nella prima colonna della cartella di lavoro corrente, con inizio alle cella A1.

GetSheets Sub ()
Dim J As Integer
NumSheets Dim As Integer

NumSheets = Sheets.Count
Per J = 1 Per NumSheets
Cellule (J, 1) = Sheets (J) .Name
Successivo J
End Sub

ExcelTips è la vostra fonte per la formazione Microsoft Excel conveniente. Questo suggerimento (11679) si applica a Microsoft Excel 2007 e il 2010. Si può trovare una versione di questo suggerimento per l'interfaccia del menu precedente di Excel qui: Recupero del foglio di lavoro Nomi.