如何利用Excel批量修改工作表名称

修法布施得聪明智慧，多分享让生活更美好。上次我们分享了如何快速生成工作表目录，在实际操作中，有时还需要对大量的工作表进行批量改名。那么在Excel中如何高效处理这一问题呢？接下来将分享详细的操作方法。

修法布施得聪明智慧，多分享让生活更美好。上次我们分享了如何快速生成工作表目录，在实际操作中，有时还需要对大量的工作表进行批量改名。那么在Excel中如何高效处理这一问题呢？接下来将分享详细的操作方法。

打开Excel并设置宏

首先打开 Microsoft Office Excel 2007，新建文档并保存文件名为“Excel批量工作表改名.xlsm”（以下代码适用于能运行宏的工作簿）。然后按下快捷键ALT F11打开VBA（宏）编辑界面，点击菜单栏【插入】中的【模块（M）】，插入一个模块1，在代码框中粘贴以下代码：

```vba

Sub 当前工作薄批量工作表改名()

Dim mb(), c As Long, r As Long, i As Long

mb Selection

r UBound(mb, 1)

c UBound(mb, 2)

On Error Resume Next

If c 2 Then

For i 1 To r

If mb(i, 1) <> "" And mb(i, 2) <> "" Then

Sheets(mb(i, 1)).Name mb(i, 2)

End If

Next i

End If

End Sub

```

实际操作步骤

1. 返回到工作表窗口，选择数据（一列工作表名和一列要修改的工作表名，行一一对应）。

2. 运行【当前工作薄批量工作表改名】宏（在菜单栏中点击【视图】，在下拉列表中选择【宏】，打开宏对话框，选中该宏名称执行）。

3. 工作表会秒速完成批量修改的操作，操作过程如图所示。

如果这篇文章对您有帮助，请不吝投下您宝贵的一票或收藏支持我们！若仍有疑问，欢迎点击下方的“我有疑问”，谢谢您的阅读与支持！