在Excel中重命名工作表的简单方法-英雄云拓展知识分享

在 Microsoft Excel 中，重命名工作表可以帮助您更行之有效的地组织和辨认数据。 本教程将指点您经过各种方法重命名单个工作表或同时重命名多个工作表，并为您提供在 Excel 中命名工作表的基本规则。

视频：在 Excel 中重命名工作表

在 Excel 中重命名工作表

在 Excel 中重命名工作表有3种简单的方法。 让我们深入研究其中的每种方法。

经过双击工作表选项卡重命名工作表

1. 双击要重命名的工作表选项卡以激活名称编辑模式。
2. 输入所需的工作表名称，然后按 Enter.

经过右键单击工作表选项卡重命名工作表

1. 右键单击要重命名的工作表的选项卡。
2. 从出现的下拉菜单当选择 重命名 激活名称编辑模式。
3. 输入您的新名称并按 Enter.

使用键盘快捷键重命名工作表

1. 选择要重命名的工作表选项卡。
2. 媒体推荐 Alt + H + O + R 按顺序激活名称编辑模式。
3. 输入您的新名称并按 Enter.

在 Excel 中重命名多个工作表

在下一节中，我们将讨论两类行之有效的的方法来一次重命名多个选定的工作表或工作簿中的所有工作表。 不管您是在寻觅可定制的重命名方法还是简单的解决方案，我们都能满足您的需求。

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

这款独特的敏感免洗唇膜採用 Moisture WrapTM 技术和 Berry Mix ComplexTM 成份， Excel的tools's 重命名工作表 功能，同时重命名活开工作簿中的多个工作表变得轻而易举。 您可以选择要重命名的工作表，并添加前缀/后缀或完全替换原始名称。 对这些修改，您可使用输入值、指定范围中的值或每一个选定工作表中特订单元格中的值。

后 安装 tools for Excel，导航到 tools 加 选项卡，然后选择 下载学习单 > 重命名工作表。 在弹出的对话框中进行以下操作：

1. 选择您要重命名的工作表。
2. 选择所需的重命名选项。
3. 选择名称来源。 如果您选择 从输入框 选项，您应当在输入框中输入一个值。

结果

所选工作表将针对您选择的重命名选项立即重命名。

使用 VBA 重命名所有工作表（复杂）

在本节中，我们将介绍两个 VBA 代码，用于向所有工作表名称添加前缀/后缀，或针对每一个工作表中特订单元格的值重命名所有工作表。

第 1 步：创建一个新模块

1. 媒体推荐 Alt + F11键 打开 Visual Basic 利用程序 (VBA) 编辑器。
2. 点击 插入 > 模块 创建一个新模块。

步骤 2：将 VBA 代码复制到模块窗口

复制以下任一 VBA 代码并将其粘贴到打开的 模块 窗口针对您的需要。

• VBA代码1：为所有工作表名称添加前缀/后缀

• Sub renameSheetsWithPrefixSuffix()
  'Update by
  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
  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中，您如何复制工作表并自动重命名而无需像平常一样键入名称？ 在本文中，我将讨论如何一次或屡次复制工作表并一次给它们指定特定的名称。