Створіть зміст для книги, перерахувавши назви всіх аркушів у книзі Excel
Хочете отримати список усіх робочих листів у робочій книзі? Потім використовуйте макрос VBA. Наступний макрос створює новий аркуш в активній книзі та перелічує назви всіх аркушів один під одним на цьому аркуші:
Додатковий списокBlaetter ()
Яскрава лінія як ціле число
Затемнити список як робочий аркуш
Встановити список = ActiveWorkbook.Worksheets.Add
Для рядка = 1 До ActiveWorkbook.Worksheets.Count
List.Cells (рядок, 1) .Value = Робочі листи (рядок) .Name
Наступний рядок
End Sub
Після запуску макрос формує список робочих аркушів в активних книгах. Цей список знаходиться на новому робочому аркуші. Наступний малюнок показує, як може виглядати результат:
Щоб ввести макрос, натисніть комбінацію клавіш ALT F11 в Excel. Це викликає редактор VBA. Використовуйте команду INSERT - MODULE, щоб вставити порожній аркуш модуля. Щоб запустити макрос, натисніть комбінацію клавіш ALT F8 у програмі Excel.
