如何在 Excel 中創建一個包含指向每個工作表的超連結的下拉列表？

您是否知道，您還可以創建一個包含指向工作簿中每個工作表的超連結的下拉列表？或者，如果您更喜歡可點擊的列表而不是下拉列表，您可以生成一個包含所有工作表超連結的列表。在本指南中，我們將引導您完成這兩種方法：創建帶有工作表鏈接的下拉列表和生成可點擊的工作表名稱列表。

創建帶有工作表超連結的下拉列表

創建可點擊的工作表名稱列表

創建帶有工作表超連結的下拉列表

要在 Excel 中創建一個包含指向工作簿中每個工作表的超連結的下拉列表，您可以使用簡單的 VBA 代碼來實現。

1. 點擊 開發工具 > 插入 > 組合框 (ActiveX 控件)。

注意：如果功能區中未顯示開發工具選項卡，請點擊 文件 > 選項 > 自訂功能區，然後在右側方框中勾選 開發工具 選項。參見截圖：

2. 然後在您喜歡的任何位置繪製一個組合框。

3. 右鍵單擊剛才繪製組合框的工作表，並從上下文菜單中選擇 檢視程式碼。

4. 複製並將以下代碼粘貼到空白腳本中，然後保存以返回工作表。

VBA：創建帶有工作表鏈接的下拉列表

 Private Sub ComboBox1_Change()
'UpdatebyExtendoffice20180404
    Sheets(Me.ComboBox1.Text).Select
End Sub
Private Sub ComboBox1_GotFocus()
    Dim I As Long
    Me.ComboBox1.Style = fmStyleDropDownList
    If Me.ComboBox1.ListCount <> Sheets.Count Then
        Me.ComboBox1.Clear
        For I = 1 To ActiveWorkbook.Sheets.Count
            Me.ComboBox1.AddItem Sheets(I).Name
        Next
    End If
    Me.ComboBox1.DropDown
End Sub

5. 點擊 開發工具 > 設計模式 退出設計模式。

現在，所有工作表都已列在下拉列表中，當您點擊工作表名稱時，它將定位至該工作表。

創建可點擊的工作表名稱列表

如果您更喜歡創建一個可點擊的工作表名稱列表，如下面的截圖所示，您可以使用 Kutools for Excel 的 創建鏈接表 功能。此工具允許您生成一個包含指向工作表名稱的超連結列表或與每個工作表相連的巨集按鈕列表。

1. 點擊 Kutools Plus > 工作表 > 創建鏈接表。

2. 在 創建鏈接表 對話框中，執行以下操作：

(1). 勾選 創建超鏈接 以創建可點擊的工作表名稱列表，或勾選 創建按鈕和巨集 以創建與每個工作表相連的按鈕。

(2). 為放置超連結的新工作表命名。

(3). 指定新工作表的位置。

(4). 指定工作表鏈接顯示為多少列。

3. 點擊 確定，現在可點擊的工作表名稱已經顯示在新工作表中。

演示：創建可點擊的工作表名稱列表