如何在 Excel 中建立動態的工作表名稱清單？

作者Sun修改日期2024-09-25

如果您在一個工作簿中有多個工作表，並希望在新工作表中建立所有工作表名稱的動態清單，該如何操作？本教學將介紹幾種實用技巧，協助您在 Excel 中快速完成這項任務。

使用「定義名稱」與公式建立動態的工作表名稱清單

1. 在空白工作表中選取一個儲存格（此處我選取 A1），然後按一下公式 > 定義名稱。請參閱截圖：
功能區上的「定義名稱」按鈕

2. 接著在新建名稱對話方塊中，於 Sheets 欄位將名稱輸入至名稱文字方塊（可依需求修改），並在「參照」文字方塊中輸入以下公式：=SUBSTITUTE(GET.WORKBOOK(1),"["&GET.WORKBOOK(16)&"]","")。請參閱截圖：
「新增名稱」對話框

3. 按一下確定，接著回到所選儲存格（A1），輸入公式 =INDEX(Sheets,ROWS($A$1:$A1))（其中 A1 為您輸入公式的儲存格，「Sheets」為步驟 2 中定義的名稱），然後向下拖曳自動填滿控制點，直到出現 #REF！為止。
在儲存格中輸入公式並出現 #REF! 錯誤

提示：若工作表被刪除或新增，請返回 A1 儲存格按下 ENTER 鍵，再重新拖曳自動填滿控制點。
再次在儲存格中輸入公式並出現 #REF! 錯誤

使用 VBA 程式碼建立動態的工作表名稱清單

若想建立可連結至各工作表的動態工作表名稱清單，可運用 VBA 程式碼輕鬆實現。

1. 建立一個新工作表，並將其重新命名為「Index」。請參閱以下截圖：

右鍵選單中的「重新命名」選項工作表已重新命名為 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 Sub

4. 按一下執行或 F5 以執行 VBA，即可立即建立動態的工作表名稱清單！
已建立動態的工作表名稱清單

提示：

1. 當工作簿中插入或刪除工作表時，工作表名稱清單會自動更新。

2. 只需點擊名稱列表中的工作表名稱，即可直接跳轉至該工作表。

上述兩種方法可能不夠便利；若您對新工具感興趣，接下來的兩種方法或許能讓這項任務變得更加輕鬆。

使用 Kutools for Excel 建立動態的工作表名稱清單

若您只想快速列出工作簿中的所有工作表名稱，並一鍵連結至原始工作表，可使用 Kutools for Excel 的創建鏈接表功能！

Kutools for Excel 提供超過 300 項進階功能，簡化複雜作業，提升創造力與效率。整合 AI 功能，Kutools 能精準自動化各項任務，讓資料管理輕鬆無負擔。Kutools for Excel 的詳細資訊…… 免費試用……

安裝免費版 Kutools for Excel 後，請依照下列步驟操作：

1. 按一下 KUTOOLS PLUS > 工作表 > 創建鏈接表。請參閱截圖：

功能區 Kutools Plus 索引標籤上的「建立工作表名稱清單」選項

2. 在創建鏈接表對話方塊中：

（1) 在類型區段中勾選您需要的索引樣式；
（2) 在創建鏈接表的名稱文字方塊中輸入資料，為新索引工作表命名；
（3) 在 工作簿中插入的位置清單中指定新增索引工作表的位置；
（4) 若您希望以單一清單顯示工作表名稱，請在跨越的行數清單中選取 1 欄。

3. 按一下確定，即可立即看到工作表名稱已列出！
已建立工作表名稱清單

提示：

1. 只需輕點工作表名稱，即可快速切換至對應的原始工作表。

2. 此清單或工作表名稱無法隨工作表的插入或刪除自動更新。

3. 實際上，您也可以建立按鈕清單來連結至對應的工作表！只需在對話方塊中勾選創建按鈕和巨集即可。詳情請參閱下方截圖：
已建立連結至相對工作表的按鈕清單

按此處進一步了解創建鏈接表。

建立可點選的工作表名稱清單

Kutools for Excel：超過 300 種實用工具隨手可得！盡享 AI 驅動功能，讓工作更聰明、更快速！立即下載！

使用 Kutools for Excel 顯示動態的工作表名稱清單

若您使用 Kutools for Excel，也可透過導覽工具，在窗格中輕鬆顯示可連結的工作表名稱！

安裝免費版 Kutools for Excel 後，請依照下列步驟操作：

1. 按一下 Kutools > 導覽，再點選工作簿和表，即可顯示所有工作簿與工作表。選取任一工作簿後，其對應的工作表便會立即呈現在導覽窗格中！請參閱下方截圖：
活頁簿與工作表窗格

提示：

當您在導覽窗格中按一下，即可重新整理工作表名稱，適用於工作表被刪除或新增時。

按此處獲取更多關於導覽功能的資訊。

導航 -—— 清單工作表 s

Kutools for Excel：超過 300 種實用工具隨手可得！盡享 AI 驅動功能，讓工作更聰明、更快速！立即下載！

最佳 Office 生產力工具

🤖	KUTOOLS AI 助手：基於以下內容徹底革新數據分析：智慧執行｜產生程式碼｜建立自訂公式｜分析資料並產生圖表｜呼叫增強函數……
	熱門功能：尋找、醒目提示或標記重複值｜刪除空白行｜合併列或儲存格而不遺失資料｜不使用公式的四捨五入……
	高級 LOOKUP：多重條件 VLookup ｜多重數值 VLookup ｜跨多個工作表 VLookup ｜模糊查找……
	高級下拉列表：快速建立下拉式清單｜相依式下拉式清單｜多選下拉式清單……
	欄位管理員：新增指定數量的欄位｜移動欄位｜切換隱藏欄位的可見狀態｜比較範圍與欄位……
	精選功能：網格聚焦｜設計視圖｜增強編輯欄｜工作簿與工作表管理員｜資源庫（自動文字）｜日期提取｜合併工作表｜加密／解密儲存格｜依清單傳送電子郵件｜超級篩選｜特殊篩選（篩選粗體儲存格／斜體／刪除線……） ......
	頂尖 15 工具組：12 文字工具（添加文本，刪除特定字符，……）｜ 50+ 圖表類型（甘特圖，……）｜ 40+ 實用公式（基於生日計算年齡，……）｜ 19 插入工具（插入二維碼，從路徑插入圖片，……）｜ 12 轉換工具（金額轉大寫，匯率轉換，……）｜ 7 合併和拆分工具（高級合併行，分割儲存格，……）｜……以及更多