在 Excel 中重命名一个或多个工作表选项卡的 4 个选项

如何使用 VBA 代码一次重命名多个工作表？在 Excel 中，您可以为工作簿中的每个工作表选项卡分配唯一的名称，以便可以轻松找到所需的选项卡。在本教程中，我们将向您展示 4 种简单方法来重命名 Excel 中的一个或多个工作表选项卡。

笔记：工作表选项卡的名称最多只能有 30 个字符。

选项 1：使用“重命名”快捷菜单重命名工作表选项卡

右键单击要重命名的特定选项卡。右键单击时，您可以看到出现许多选项。从那里，选择重命名快捷菜单。

输入要为工作表选项卡指定的名称，然后按 Enter 键。对要重命名的每个选项卡重复此过程。

选项 2：通过双击工作表选项卡来重命名该选项卡

建议阅读：如何删除 Chrome 选项卡上的虚线圆圈和 Edge 中褪色的选项卡

在 Excel 中重命名工作表选项卡的另一种方法是双击工作表选项卡。当您双击底部的工作表选项卡时，选项卡名称（例如 Sheet1）会突出显示。之后，您只需输入新名称即可。

选项 3：使用键盘快捷键重命名工作表选项卡

选择要重命名的工作表选项卡，然后按键盘快捷键替代+氧+H+右（只需按顺序依次按下键盘上的这 4 个键即可），输入名称并按 Enter。

选项 4：使用 VBA 代码重命名多个工作表选项卡

如果您使用上述方法重命名大量工作表选项卡，这可能是一项耗时的任务。为了简化工作，您可以使用 VBA 代码重命名多个工作表选项卡。

1. 打开 Excel 工作簿后，按替代+F11打开 Visual Basic 编辑器的快捷方式。右键单击左侧窗格中的 VBAProject，然后选择插入->模块插入新模块。
2. 复制以下 VBA 代码并将其粘贴到 VBA 编辑器的右窗格（“Module1”窗口）。单击跑步菜单，然后选择运行宏。

   Sub RenamingSheets()
nmbr = InputBox("What's the first number you want to name the sheets?", "Renaming Sheets")
For ws = 1 To Worksheets.Count
Sheets(ws).Name = "KB" & nmbr
nmbr = nmbr + 1
Next ws
End Sub

   

3. 您的所有工作表选项卡都将快速重命名为新名称，例如“KB1”。您可以更改 VBA 代码以将工作表重命名为您想要的名称。