在 Microsoft Excel 中，重命名工作表可以幫助您更有效地組織和識別數據。 本教程將指導您通過各種方法重命名單個工作表或同時重命名多個工作表，並為您提供在 Excel 中命名工作表的基本規則。

重命名工作表 雙擊工作表選項卡 右鍵單擊工作表選項卡 使用鍵盤快捷鍵 重命名多個工作表 特定/所有工作表的可自定義批量重命名 VBA重命名所有工作表的方法 Excel 中工作表的命名規則

視頻：在 Excel 中重命名工作表

在 Excel 中重命名工作表

在 Excel 中重命名工作表有三種簡單的方法。 讓我們深入研究其中的每一種方法。

通過雙擊工作表選項卡重命名工作表

1. 雙擊要重命名的工作表選項卡以激活名稱編輯模式。
2. 輸入所需的工作表名稱，然後按 Enter.
3. 

通過右鍵單擊工作表選項卡重命名工作表

1. 右鍵單擊要重命名的工作表的選項卡。
2. 從出現的下拉菜單中選擇 重命名 激活名稱編輯模式。
3. 輸入您的新名稱並按 Enter.
4. 

使用鍵盤快捷鍵重命名工作表

1. 選擇要重命名的工作表選項卡。
2. 媒體推薦 Alt + H + O + R 按順序激活名稱編輯模式。
3. 輸入您的新名稱並按 Enter.

在 Excel 中重命名多個工作表

在下一節中，我們將討論兩種有效的方法來一次重命名多個選定的工作表或工作簿中的所有工作表。 無論您是在尋找可定制的重命名方法還是簡單的解決方案，我們都能滿足您的需求。

使用多功能工具批量重命名特定/所有工作表

這款獨特的敏感免洗唇膜採用 Moisture WrapTM 技術和 Berry Mix ComplexTM 成分， Excel的Kutools's 重命名工作表 功能，同時重命名活動工作簿中的多個工作表變得輕而易舉。 您可以選擇要重命名的工作表，並添加前綴/後綴或完全替換原始名稱。 對於這些修改，您可以使用輸入值、指定範圍中的值或每個選定工作表中特定單元格中的值。

後 安裝 Kutools for Excel，導航到 Kutools 加 選項卡，然後選擇 下載學習單 > 重命名工作表。 在彈出的對話框中進行如下操作：

1. 選擇您要重命名的工作表。
2. 選擇所需的重命名選項。
3. 選擇名稱來源。 如果您選擇 從輸入框 選項，您應該在輸入框中輸入一個值。
4. 

結果

所選工作表將根據您選擇的重命名選項立即重命名。

使用 VBA 重命名所有工作表（複雜）

在本節中，我們將介紹兩個 VBA 代碼，用於向所有工作表名稱添加前綴/後綴，或根據每個工作表中特定單元格的值重命名所有工作表。

第 1 步：創建一個新模塊

1. 媒體推薦 Alt + F11鍵 打開 Visual Basic 應用程序 (VBA) 編輯器。
2. 點擊 插入 > 模塊 創建一個新模塊。
3. 

步驟 2：將 VBA 代碼複製到模塊窗口

複製以下任一 VBA 代碼並將其粘貼到打開的 模塊 窗口根據您的需要。

• VBA代碼1：為所有工作表名稱添加前綴/後綴

• Sub renameSheetsWithPrefixSuffix()
  'Update by ExtendOffice
      Dim xWs As Worksheet
      Dim xPrefix As String
      Dim xSuffix As String
      xPrefix = "MyPre_" 'Replace "MyPre_" with your desired prefix.
      xSuffix = "_MySuf" 'Replace "_MySuf" with your desired suffix.
      On Error Resume Next
      For Each xWs In Worksheets
          xWs.Name = xPrefix & xWs.Name & xSuffix 'This snippet adds both prefix and suffix to sheet names. Adjust as needed.
      Next xWs
  End Sub

• 注意：

  • 在此代碼中，要向所有工作表名稱添加前綴和後綴，您應該替換 “我的預_” 和 “_MySuf” 在第 6 行和第 7 行分別添加您所需的前綴和後綴。
  • 如果只添加前綴，請將第10行代碼修改為 xWs.Name = xPrefix & xWs.Name.
  • 如果只添加後綴，則將第10行代碼修改為 xWs.Name = xWs.Name & xSuffix.
• VBA代碼2：根據每個工作表中指定單元格的值重命名所有工作表

• Sub renameSheetsBasedOnCellValue()
  'Update by ExtendOffice
      Dim xWs As Worksheet
      Dim xRgAddress As String
      xRgAddress = "A1" 'Replace "A1" with your target cell address.
      On Error Resume Next
      For Each xWs In Worksheets
          xWs.Name = xWs.Range(xRgAddress).Value
      Next xWs
  End Sub

• 注意： 在此VBA代碼中，記得更改 “ A1” 將第 5 行添加到包含每個工作表的新名稱的實際單元格地址。 另外，請確保每張工作表上的指定單元格（在本例中為 A1）包含一個值。 否則，運行此 VBA 代碼將導致運行時錯誤“1004”。

第 3 步：運行 VBA 代碼

在 模塊 窗口，按 F5 或單擊 按鈕來執行粘貼的代碼。

結果

• VBA代碼1的結果： “Pre_”和“_Suf”分別作為前綴和後綴添加到所有工作表名稱中。
• 
• VBA代碼2的結果： 所有工作表均根據每個工作表的單元格 A1 中的值重命名，分別為“Test1”、“Test2”和“Test3”。
• 

Excel 中工作表的命名規則

重命名工作表時，您需要遵循一些規則：

• 工作表名稱在工作簿中必須是唯一的。
• 工作表名稱不得超過 31 個字符。
• 工作表名稱不能為空。
• 工作表名稱不得包含以下字符： \/？ : * [ ].
• 工作表名稱不得以撇號開頭或結尾 (')，儘管它可以用在名稱中間的某個位置。
• 工作表名稱不能是 發展歷程 因為它保留供 Excel 內部使用。

通過遵循本教程，您可以有效地重命名 Excel 中的工作表，以更好地組織和管理數據。 我希望本教程對您有所幫助。 如果您想探索更多 Excel 提示和技巧， 請點擊這裡 訪問我們廣泛收集的超過數千個教程。

相關文章

• 如何在Excel中復制工作表並自動重命名？
• 在Excel中，您如何復制工作表並自動重命名而無需像往常一樣鍵入名稱？ 在本文中，我將討論如何一次或多次復制工作表並一次給它們指定特定的名稱。