Изведете имената на работните листове в работна книга на Excel като списък

Съдържание

Създайте съдържание за работна книга, като изброите имената на всички работни листове в работна книга на Excel

Искате ли да получите списък с всички работни листове в работна книга? След това използвайте макрос VBA. Следният макрос създава нов работен лист в активната работна книга и изброява имената на всички листове един под друг в този работен лист:

Sub ListBlaetter ()
Затъмнена линия като цяло число
Dim List като работен лист
Задайте списък = ActiveWorkbook.Worksheets.Add
За ред = 1 Към ActiveWorkbook.Worksheets.Count
List.Cells (ред, 1) .Value = Работни листове (ред). Име
Следващ ред
End Sub

След като стартира, макросът генерира списък с работни листове в активните работни книги. Този списък е в нов работен лист. Следващата фигура показва как може да изглежда резултатът:

За да въведете макроса, натиснете клавишната комбинация ALT F11 в Excel. Това извиква редактора на VBA. Използвайте командата INSERT - MODULE, за да вмъкнете празен модулен лист. За да стартирате макроса, натиснете клавишната комбинация ALT F8 в Excel.

Така ще помогнете за развитието на сайта, сподели с приятелите си

wave wave wave wave wave