列出 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 技巧和竅門，請持續關注我們的博客。