如何透過在 Excel 的下拉式清單中選取工作表名稱，快速開啟對應的工作表？

作者Siluvia修改日期2024-11-25

假設您的 Excel 工作表中有一個下拉式方塊，內含所有工作表名稱的清單。您希望透過從該下拉式方塊中選擇特定名稱，即可快速切換至對應的工作表。本指南將逐步示範如何運用 VBA 程式碼實現此功能，包括自動填入工作表名稱至下拉式方塊，以及啟用相關互動功能的完整步驟。

Excel 中包含工作表名稱的下拉式核取方塊截圖

使用 VBA 程式碼透過下拉式方塊選擇工作表名稱來開啟工作表

使用 VBA 程式碼透過下拉式方塊選擇工作表名稱來開啟工作表

下列 VBA 程式碼可協助您根據 Excel 下拉式清單的選擇，快速跳轉至對應的工作表。請依照以下步驟操作：

注意：如果您的工作表中下拉式方塊尚未包含任何工作表名稱，請依照下方提示，快速將所有工作表名稱新增至該下拉式方塊。若已包含完整的工作表名稱清單，請直接進入 步驟 1.

提示：在工作表中插入一個命令按鈕 1，右鍵點擊該按鈕，並從右鍵選單中選擇檢視程式碼。接著將下方的 VBA 程式碼複製並貼上至程式碼視窗中，然後按下 Alt+Q 鍵，即可關閉 Microsoft Visual Basic for Applications 視窗。點擊已插入的命令按鈕後，當前工作簿的所有工作表名稱將自動新增至 ComboBox 1 中。

VBA 程式碼：輕鬆將所有工作表名稱新增至下拉式方塊

Private Sub CommandButton1_Click()
    Me.ComboBox1.Clear
    Dim strWs As String
    Dim i As Integer
    
    For i = 1 To ThisWorkbook.Sheets.Count
        Me.ComboBox1.AddItem Sheets(i).Name
    Next
End Sub

若已有包含所有工作表名稱的下拉式選單，請依照下列步驟操作。

1. 在開發人員索引標籤下啟用設計模式。

2. 右鍵點擊含有工作表名稱的下拉式方塊，然後從右鍵選單中點選檢視程式碼。

在 Excel 中透過右鍵選單存取下拉式核取方塊程式碼的截圖

3. 此時會彈出 Microsoft Visual Basic for Applications 視窗，請將程式碼視窗中的原始 VBA 程式碼替換為下方提供的 VBA 程式碼。

VBA 程式碼：透過下拉式方塊的選取值開啟特定工作表

Private Sub ComboBox1_Change()
    Dim actWsh As String
    actWsh = ComboBox1.Text
    Worksheets(actWsh).Select
End Sub

注意：程式碼中的 ComboBox 1 是用來顯示工作表名稱的下拉式方塊名稱。

4. 按下 Alt+Q 鍵，關閉 Microsoft Visual Basic for Applications 視窗，並於開發人員索引標籤中關閉設計模式。

現在，只需在下拉式方塊中選擇任一工作表名稱，即可自動開啟對應的工作表。

在活頁簿中使用工作表索引，可輕鬆管理工作表！透過 Kutools for Excel 的創建鏈接表功能，您能快速建立包含目前活頁簿中所有工作表名稱的索引。建立後，只需點擊索引工作表中的工作表名稱，即可立即切換至指定工作表。請參閱下方截圖：

使用 Kutools for Excel 建立的工作表索引截圖

Kutools for Excel－透過超過 300 項必備工具全面強化 Excel，讓您的工作更快速、更輕鬆，並運用 AI 功能實現更聰明的資料處理與高效生產力！立即取得

最佳 Office 生產力工具

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