如何在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 20180413Dim xalerts As BooleanDim I As LongDim xShtIndex As WorksheetDim xSht As Variantxalerts = Application.DisplayalertsApplication.Displayalerts = FalseOn Error Resume NextSheets("Table of contents").DeleteOn Error GoTo 0Set xShtIndex = Sheets.Add(Sheets(1))xShtIndex.Name = "Table of contents"I = 1Cells(1, 1).Value = "Table of contents"For Each xSht In ThisWorkbook.SheetsIf xSht.Name <> "Table of contents" ThenI = I + 1xShtIndex.Hyperlinks.Add Cells(I, 1), "", "" & xSht.Name & "!A1", , xSht.NameEnd IfNextApplication.Displayalerts = xalertsEnd SubCopy

3。 按 F5 鍵或單擊“運行”按鈕以運行代碼。

然后，在所有工作表的前面創建一個目錄工作表，并在其中列出所有工作表名稱。 您可以通過單擊目錄中的工作表名稱導航到任何工作表。 看截圖：

通過以下方式輕松創建目錄 Kutools for Excel

創建工作表名稱列表 實用程序 Kutools for Excel 可以幫助您快速在當前工作簿中創建目錄。 請執行以下操作。

申請前 Kutools for Excel請 首先下載并安裝.

1.在工作簿中，您需要創建一個目錄，單擊 Kutools 加 > 工作表 > 創建工作表名稱列表。 看截圖：

2.在 創建工作表名稱列表 對話框，您需要：

2.1選擇 包含超鏈接列表 在選項 工作表索引樣式 部分;2.2輸入 目錄 ，在 指定圖紙索引的圖紙名稱 文本框;2.3將默認選項保留在插入 工作表索引 和 顯示工作表索引到 下拉列表；2.4點擊 OK 按鈕。 看截圖：

然后創建一個目錄工作表，如下圖所示。 您可以通過單擊目錄中的工作表名稱導航到任何工作表。

如果在“選擇索引樣式”部分中選擇“包含按鈕和宏”選項，您將獲得一個目錄，如下面的屏幕快照所示。

如果您想（30-day) 這個實用程序， 請點擊下載，然后按照上述步驟進行操作。

相關文章：如何在Excel中的單元格中引用選項卡名稱？如何在Excel中將單元格值與工作表標簽名稱匹配，反之亦然？如何通過Excel中的組合框的選定值打開特定的工作表？

最佳辦公生產力工具

將小時轉化為分鐘 Kutools for Excel!

準備好增強您的 Excel 任務了嗎？ 利用的力量 Kutools for Excel - 您終極的節省時間的工具。 簡化復雜的任務并像專業人士一樣瀏覽數據。 以閃電般的速度體驗 Excel！

為什么需要 Kutools for Excel