4 在 Excel 工作表中列出所有工作表名稱的高效方法

在大型 Excel 工作表中瀏覽眾多工作表可能相當麻煩，尤其是當您需要快速概覽所有可用工作表時。本文介紹四種實用方法，協助您輕鬆列出工作簿中的所有工作表名稱，大幅提升工作效率與工作簿的組織性。

在工作簿中列出所有工作表名稱

• 使用複製與貼上（手動操作）
• 使用 Kutools for Excel（簡單易用，工作表名稱可設為連結）
• 使用名稱範圍（在新工作表中列出）
• 使用 VBA（不穩定）

在工作簿中列出所有工作表名稱

本教學提供四種高效方法，助您輕鬆列出工作簿中的所有工作表。請選擇最符合需求的方式，並依照步驟說明快速完成任務！

使用複製與貼上（手動操作）

列出所有工作表名稱最簡單的方法是手動操作：

步驟 1：開啟新工作簿

步驟 2：雙擊要複製的工作表標籤

步驟 3：按下 Ctrl + C 鍵複製工作表名稱

步驟 4：按一下儲存格並按下 Ctrl + V 貼上工作表名稱

步驟 5：重複上述步驟，逐一將所有工作表標籤名稱複製貼上至工作簿中

此方法適用於少數工作表名稱，但若工作表多達數十個，將耗時費力。針對較大型的工作簿，建議採用下方所述的更高效方法。

使用 Kutools for Excel（簡單易用，工作表名稱可設為連結）

Kutools for Excel 的「建立連結表」功能可快速生成包含所有工作表名稱的可點擊清單，大幅提升 Excel 使用效率。此功能會自動為每個工作表插入超連結，只需輕點一下即可立即跳轉，特別適合管理大型工作簿，其便捷性與效率遠勝 Excel 的手動操作方式。

點選「KUTOOLS PLUS」＞「工作表」＞「建立連結工作表」。在彈出的對話框中，設定下列選項：

1. 選擇索引樣式（決定可連結的工作表名稱以超連結文字或按鈕形式顯示）。

2. 為即將列出工作表名稱的新工作表命名。

3. 指定新工作表的插入位置。

4. 選擇用於排序工作表名稱的欄位數。

5. 按一下「確定」。

   

若想快速檢視並在工作表間無縫切換，Kutools for Excel 的「導航」功能極為高效！它不僅將所有工作表名稱列為可點擊連結，讓您一鍵快速存取，還能顯示所有已開啟的工作簿，助您瞬間切換自如。

使用名稱範圍（在新工作表中列出）

在 Excel 中，您可透過建立一個名稱範圍，輕鬆高效地在新工作表中列出所有工作表名稱。

步驟 1：按一下「公式」>「定義名稱」

步驟 2：在新建名稱對話方塊中編輯名稱與公式

• 「名稱」：輸入名稱範圍的名稱

• 「參照」：將下方公式複製貼上至此處

  =REPLACE(GET.WORKBOOK(1),1,FIND("]",GET.WORKBOOK(1)),"")

• 點擊「確定」。

  

步驟 3：使用公式來清單工作表名稱

在儲存格中輸入下列公式，然後按下「ENTER 鍵」，即可取得所有工作表名稱。

=TRANSPOSE(ListNames)

ListNames 是您在上述步驟中為名稱範圍所指定的名稱。

使用 VBA（不穩定）

另一種更進階且可自訂的方法是撰寫 VBA 指令碼，以提取並列出工作表名稱：

步驟 1：開啟您要列出其工作表名稱的活頁簿

步驟 2：按下 Alt + F11 鍵以開啟 Microsoft Visual Basic for Applications 視窗

步驟 3：按一下「插入」>「模組」

步驟 4：將下方程式碼複製並貼上至模組中

Sub ListSheetNamesInNewWorkbook()
'UpdatebyExtendoffice
    Dim wbSource As Workbook
    Dim wbTarget As Workbook
    Dim wsTarget As Worksheet
    Dim i As Integer
    
    ' Reference the current workbook
    Set wbSource = ActiveWorkbook
    
    ' Create a new workbook
    Set wbTarget = Workbooks.Add
    Set wsTarget = wbTarget.Sheets(1)
    
    ' List all sheet names from the active workbook in the new workbook
    For i = 1 To wbSource.Sheets.Count
        wsTarget.Cells(i, 1).Value = wbSource.Sheets(i).Name
    Next i
    
    ' Cleanup
    Set wbSource = Nothing
    Set wbTarget = Nothing
    Set wsTarget = Nothing
End Sub

步驟 5：按下 F5 鍵或按一下「執行」按鈕以執行程式碼

現在將開啟一個新工作簿，用來列出所有工作表的名稱。

每種方法皆根據您的需求提供獨特優勢——從簡單的手動列舉，到更精密的解決方案（例如 Kutools 或 VBA）。選定最契合您工作流程的方法，即可高效管理並快速瀏覽 Excel 工作表！如需更多 Excel 實用技巧，請持續關注我們的部落格。