Как создать оглавление для всех названий вкладок электронных таблиц с гиперссылками в Excel?
Книга Excel становится довольно большой, так как внутри создается все больше и больше листов. Чем больше листов существует, тем труднее сохранять обзор рабочих листов. Следовательно, вам нужно оглавление, чтобы быстро перемещаться между листами в Excel. Эта статья покажет вам, как этого добиться.
Создать оглавление по коду VBA
Легко создать оглавление с помощью Kutools for Excel
Создать оглавление по коду VBA
Следующий код VBA может помочь вам создать оглавление для всех листов с гиперссылками в Excel. Пожалуйста, сделайте следующее.
1. нажмите другой + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
2. в Microsoft Visual Basic для приложений окна, нажмите Вставить > Модули, затем скопируйте приведенный ниже код VBA в окно кода.
Код VBA: создать оглавление для всех листов
Sub CreateTableofcontents()
'updateby Extendoffice 20180413
Dim xAlerts As Boolean
Dim I As Long
Dim xShtIndex As Worksheet
Dim xSht As Variant
xAlerts = Application.DisplayAlerts
Application.DisplayAlerts = False
On Error Resume Next
Sheets("Table of contents").Delete
On Error GoTo 0
Set xShtIndex = Sheets.Add(Sheets(1))
xShtIndex.Name = "Table of contents"
I = 1
Cells(1, 1).Value = "Table of contents"
For Each xSht In ThisWorkbook.Sheets
If xSht.Name <> "Table of contents" Then
I = I + 1
xShtIndex.Hyperlinks.Add Cells(I, 1), "", "'" & xSht.Name & "'!A1", , xSht.Name
End If
Next
Application.DisplayAlerts = xAlerts
End Sub
3. нажмите F5 или нажмите кнопку «Выполнить», чтобы запустить код.
Затем перед всеми листами создается таблица содержания со всеми именами листов, перечисленными внутри. Вы можете перейти к любому рабочему листу, щелкнув имя листа в оглавлении. Смотрите скриншот:
Легко создать оглавление с помощью Kutools for Excel
Ассоциация Создать список имен листов полезности Kutools for Excel может помочь вам быстро создать оглавление в текущей книге. Пожалуйста, сделайте следующее.
Перед применением Kutools for Excel, Пожалуйста, сначала скачайте и установите.
1. В книге, которую нужно создать оглавление, щелкните Кутулс Плюс > Рабочий лист > Создать список имен листов. Смотрите скриншот:
2. в Создать список имен листов диалоговое окно, вам необходимо:
Затем создается таблица содержания, как показано на скриншоте ниже. Вы можете перейти к любому рабочему листу, щелкнув имя листа в оглавлении.
Если вы выберете параметр «Содержит кнопки и макросы» в разделе «Выбрать стили индекса», вы получите оглавление, как показано на скриншоте ниже.
Если вы хотите получить бесплатную (30-дневную) пробную версию этой утилиты, пожалуйста, нажмите, чтобы загрузить это, а затем перейдите к применению операции в соответствии с указанными выше шагами.
Статьи по теме:
- Как указать имя вкладки в ячейке в Excel?
- Как сопоставить значение ячейки с именем вкладки листа или наоборот в Excel?
- Как открыть конкретный рабочий лист по выбранному значению поля со списком в Excel?
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!