如何在 Excel 中創建一個動態的工作表名稱列表？
如果您的工作簿中有多個工作表，並且您希望在工作簿的新工作表中創建所有工作表名稱的動態列表，該怎麼做呢？現在本教程介紹一些技巧，幫助您快速完成此任務。
使用 Kutools for Excel 創建動態工作表名稱列表 
使用 Kutools for Excel 顯示動態工作表名稱列表
使用「定義名稱」和公式創建動態工作表名稱列表
1. 在空白工作表中選擇一個單元格，這裡我選擇 A1，然後點擊 公式 > 定義名稱。請參閱截圖：
2. 接著在「新建名稱」對話框中，在 「名稱」文本框中輸入 Sheets（您可以根據需要更改），並在「引用位置」文本框中輸入以下公式 =SUBSTITUTE(GET.WORKBOOK(1),"["&GET.WORKBOOK(16)&"]","")。請參閱截圖：
3. 點擊「確定」。然後前往所選單元格（A1）並輸入以下公式 =INDEX(Sheets,ROWS($A$1:$A1)) （A1 是您輸入此公式的單元格，"Sheets" 是您在第 2 步中定義的名稱），然後向下拖動自動填充手柄直到 #REF! 出現。
提示：如果有工作表被刪除或新增，您需要返回到 A1 按下 Enter 鍵，然後再次拖動自動填充手柄。
使用 VBA 程式碼創建動態工作表名稱列表
如果您想創建一個可以連結到每個工作表的動態工作表名稱列表，您可以使用 VBA 程式碼。
1. 創建一個新的工作表並將其重命名為 Index。請參閱截圖：
2. 右鍵點擊 Index 的工作表名稱，從上下文菜單中選擇 查看代碼。請參閱截圖：
3. 在彈出的窗口中，複製並粘貼以下 VBA 程式碼。
VBA：創建動態工作表名稱列表。
Private Sub Worksheet_Activate()
'Updateby20150305
Dim xSheet As Worksheet
Dim xRow As Integer
Dim calcState As Long
Dim scrUpdateState As Long
Application.ScreenUpdating = False
xRow = 1
With Me
.Columns(1).ClearContents
.Cells(1, 1) = "INDEX"
.Cells(1, 1).Name = "Index"
End With
For Each xSheet In Application.Worksheets
If xSheet.Name <> Me.Name Then
xRow = xRow + 1
With xSheet
.Range("A1").Name = "Start_" & xSheet.Index
.Hyperlinks.Add anchor: = .Range("A1"), Address: = "", _
SubAddress: = "Index", TextToDisplay: = "Back to Index"
End With
Me.Hyperlinks.Add anchor: = Me.Cells(xRow, 1), Address: = "", _
SubAddress: = "Start_" & xSheet.Index, TextToDisplay: = xSheet.Name
End If
Next
Application.ScreenUpdating = True
End Sub4. 點擊 Run 或 F5 運行 VBA，現在已創建了一個動態工作表名稱列表。
提示：
1. 當工作簿中的工作表被刪除或插入時，工作表名稱列表會自動改變。
2. 您可以點擊名稱列表中的工作表名稱以進入該工作表。
以上兩種方法可能不夠方便，如果您對新工具感興趣，可以嘗試接下來的兩種方法，這可能會讓此任務變得更加容易。
使用 Kutools for Excel 創建動態工作表名稱列表
如果您只想快速列出工作簿中的所有工作表名稱並將它們連結到原始工作表，您可以使用 Kutools for Excel 的 創建鏈接表 功能。
免費安裝 Kutools for Excel 後，請按照以下步驟操作：
1. 點擊 Kutools Plus > 工作表 > 創建鏈接表。請參閱截圖：
2. 在「 創建鏈接表」對話框中：
(2) 輸入數據以命名新的索引工作表於「創建鏈接表的名稱」文本框中；
(3) 在「 工作簿中插入的位置」列表中指定添加索引工作表的位置；
(4) 如果您想以單一列表顯示工作表名稱，則在「跨越的行數」列表中選擇 1 行。
3. 點擊「確定」。現在您可以看到工作表名稱已被列出。
提示：
1. 您可以點擊工作表名稱以快速切換到其原始工作表。
2. 列表或工作表名稱不會隨著工作表的插入或刪除而動態改變。
3. 實際上，您還可以創建一個按鈕列表來連接到相應的工作表，只需在對話框中勾選 創建按鈕和巨集 即可。請參閱截圖：
創建可點擊的工作表名稱列表
使用 Kutools for Excel 顯示動態工作表名稱列表
使用 Kutools for Excel，您還可以使用 導航 功能在窗格中顯示可連結的工作表名稱。
免費安裝 Kutools for Excel 後，請按照以下步驟操作：
1. 點擊 Kutools > 導航。點擊 工作簿與工作表 以顯示工作簿和工作表，您可以選擇一個工作簿，然後其工作表將顯示在 導航 窗格中。請參閱截圖：
提示：
當有工作表被刪除或新增時，您可以點擊 刷新按鈕
在 導航窗格中刷新工作表名稱。
導航窗格 -- 列表工作表
最佳 Office 生產力工具
| 🤖 | Kutools AI 助手：以智能執行為基礎，革新數據分析 ｜生成程式碼 ｜ 創建自訂公式 ｜ 分析數據並生成圖表 ｜ 調用 Kutools 增強函數… |
| 熱門功能：查找、選取項目的背景色或標記重複值 ｜ 刪除空行 ｜ 合併列或單元格且不遺失數據 ｜ 四捨五入（免公式）... | |
| 高級 LOOKUP：多條件 VLookup｜多值 VLookup｜多表查找｜模糊查找... | |
| 高級下拉列表：快速創建下拉列表 ｜依賴型下拉列表 ｜ 多選下拉列表... | |
| 列管理器：添加指定數量的列 ｜ 移動列 ｜ 切換隱藏列的顯示狀態 ｜ 比較區域及列... | |
| 精選功能：網格聚焦 ｜ 設計檢視 ｜ 增強編輯欄 ｜ 工作簿及工作表管理器 ｜ 資源庫（快捷文本） ｜ 日期提取器 ｜ 合併資料 ｜ 加密/解密儲存格 ｜ 按列表發送電子郵件 ｜ 超級篩選 ｜ 特殊篩選（篩選粗體/傾斜/刪除線...）... | |
| 15 大工具集：12 項文本工具（添加文本、刪除特定字符…）｜50+ 儀表 類型（甘特圖等）｜40+ 實用 公式（基於生日計算年齡等）｜19 項插入工具（插入QR码、根據路徑插入圖片等）｜12 項轉換工具（金額轉大寫、匯率轉換等）｜7 項合併與分割工具（高級合併行、分割儲存格等）｜...及更多 |
運用 Kutools for Excel，全面提升您的 Excel 技能，體驗前所未有的高效。 Kutools for Excel 提供超過300 項進階功能，讓您提升工作效率、節省時間。 點此尋找您最需要的功能...
Office Tab 為 Office 帶來分頁介面，讓您的工作更加輕鬆簡單
- 在 Word、Excel、PowerPoint 中啟用分頁編輯與閱讀。
- 在同一視窗的新分頁中打開與創建多份文件，而非開啟新視窗。
- 提升您的生產力50%，每日可幫您減少數百次鼠標點擊！
所有 Kutools 外掛，一次安裝
Kutools for Office 套裝整合了 Excel、Word、Outlook 和 PowerPoint 的外掛，外加 Office Tab Pro，非常適合需要跨 Office 應用程式協同作業的團隊。
- 全合一套裝 — Excel、Word、Outlook及 PowerPoint 外掛 + Office Tab Pro
- 一鍵安裝，一份授權 — 幾分鐘完成設置（支援 MSI）
- 協同運作更順暢 — Office 應用間無縫提升生產力
- 30 天全功能試用 — 無需註冊、無需信用卡
- 最超值 — 一次購買，節省單獨外掛費用