如何在Excel中建立包含所有電子表格選項卡名稱和超連結的目錄
如果您正在處理一個包含許多工作表的龐大工作簿,並且希望採用一種井然有序的方法來瀏覽這些工作表,那麼目錄可能是一個有用的工具。每個選項卡名稱都可以製作成超連結,以便您可以輕鬆地單擊一下即可導航到特定工作表。本教程將逐步向您展示如何建立一個 Excel 目錄,該目錄會在您新增或刪除工作表時自動更新。我們還將演示如何建立直接將您帶到相應工作表的超連結。
無論您是初學者還是有一些 Excel 使用經驗,本教程都將為您提供有效管理電子表格所需的知識和技能。因此,讓我們深入瞭解如何為 Excel 中所有電子表格選項卡名稱建立包含超連結的目錄!
建立包含所有電子表格選項卡名稱和超連結的目錄
在這裡,我們將首先建立一個 VBA 模組,然後執行它來完成任務。讓我們來看一個簡單的過程,學習如何在 Excel 中為所有電子表格選項卡名稱建立包含超連結的目錄。
步驟 1
考慮一個包含多個工作表的 Excel 工作簿。
首先使用 Alt + F11 開啟 VBA 應用程式。
步驟 2
然後單擊“插入”,選擇“模組”,然後將下面的程式碼複製到文字框中。
插入 > 模組 > 複製。
示例
Sub CreateTableofcontents()
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 以完成任務。然後您將看到目錄已建立。
這就是如何在 Excel 中為所有電子表格選項卡名稱建立包含超連結的目錄的方法。
結論
在本教程中,我們使用了一個簡單的示例來演示如何在 Excel 中為所有電子表格選項卡名稱建立包含超連結的目錄,以突出顯示特定資料集。
廣告
資料結構
網路
關係資料庫管理系統 (RDBMS)
作業系統
Java
iOS
HTML
CSS
Android
Python
C語言程式設計
C++
C#
MongoDB
MySQL
Javascript
PHP