如何在工作簿中創建工作表的超鏈接索引？

在我們的日常工作中，工作簿文件中可能有多個工作表，您如何在工作表中創建工作表選項卡的索引並為每個選項卡建立超鏈接？ 在本文中，我將討論在Excel中處理此任務的一些快速技巧。

使用VBA代碼創建工作表的超鏈接索引

使用創建Kutools for Excel的圖紙名稱列表創建圖紙超鏈接索引

使用Kutools for Excel導航創建工作表的超鏈接索引

---

使用VBA代碼創建工作表的超鏈接索引

下面的VBA代碼可以幫助您在其他工作表之前的新工作表中創建工作表名稱的索引。 請執行以下操作：

1。 按住 ALT + F11 鍵打開 Microsoft Visual Basic for Applications 窗口。

2。 點擊 插入 > 模塊，然後將以下代碼粘貼到 模塊 窗口。

VBA代碼：創建工作表的超鏈接索引

Sub CreateIndex()
'updateby Extendoffice
    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("Index").Delete
    On Error GoTo 0
    Set xShtIndex = Sheets.Add(Sheets(1))
    xShtIndex.Name = "Index"
    I = 1
    Cells(1, 1).Value = "INDEX"
    For Each xSht In ThisWorkbook.Sheets
        If xSht.Name <> "Index" 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 執行此代碼的關鍵，以及名為“Index 指數”會插入到所有工作表（包括帶有超鏈接的工作表名稱）之前的工作簿中。 看截圖：

---

使用創建Kutools for Excel的圖紙名稱列表創建圖紙超鏈接索引

除了上面的VBA代碼，您還可以使用一個有用的工具來完成此工作- Excel的Kutools，其 創建工作表名稱列表，您可以使用超鏈接或按鈕快速創建工作表名稱的索引。

Excel的Kutools : 帶有300多個便捷的Excel加載項，可以在30天內免費試用.

前往下載 30天免費試用購買 貝寶/ MyCommerce

安裝後 Excel的Kutools，請執行以下步驟：

1。 點擊 Kutools 加 > 下載學習單 > 創建工作表名稱列表，請參見屏幕截圖：

2。 在 創建工作表名稱列表 對話框，請執行以下選項：

• 選擇一種索引樣式，您可以使用 超鏈接 or 鈕扣 表名索引；
• 為工作表指定名稱，該名稱將根據需要列出工作表索引；
• 指定放置工作表索引的位置；
• 選擇要放入工作表名稱列表的列數。

3. 完成設置後，單擊 Ok 按鈕，具有工作表名稱索引的新工作表已創建，如下所示：

帶有超鏈接的工作表名稱	使用按鈕的工作表名稱

單擊以了解有關此“創建圖紙名稱列表”功能的更多詳細信息……

立即免費下載Kutools for Excel

---

使用Kutools for Excel導航創建工作表的超鏈接索引

Excel的Kutools“ 導航 實用程序還可以幫助您在左窗格中列出所有工作表名稱，並且您可以單擊任何工作表名稱以轉到工作表。

安裝後 Excel的Kutools，請執行以下操作：

1。 點擊 庫工具 > 導航，請參見屏幕截圖：

2。 然後點擊 工作簿和工作表 圖標以展開導航窗格：

	1。 所有打開的工作簿都在此處列出。
	2。 當前工作簿中的可見工作表列在下面 列錶框，可以從窗格中單擊以轉到特定的工作表。

單擊以了解有關此導航窗格的更多信息…

立即免費下載Kutools for Excel