手机版

首页 IT科技安全资讯卡饭教程卡饭论坛

卡饭网 > 其他 > 正文

excel 批量复制工作表并改名

来源：本站整理作者：梦在深巷时间：2019-02-20

如果我们有一系列的Excel表格需要重命名，怎么一次性批量重命名呢？下面一起看看excel2016将sheet工作表一次性批量重命名的方法.

具体如下：

1. 第一步，我们打开excel表格文件后，再重新新建一个sheet表；
2. 在新建的这个sheet表中，我们依次输入各个sheet表的名字；
3. 输入完后，点击定位的菜单栏选项“开发工具”，如图所示。
4. 在开发工具的下拉菜单中，点击“查看代码”按钮。
5.弹出VBE对话窗口后，我们在如下图的地方下拉找到并点击“ThisWorkBooK”一项，然后右键选择点击“插入/模块”菜单项。
6. 接下来在弹出的窗口中输入代码
Sub 重命名()
Dim i&
For i = 2 To Sheets.Count
Sheets(i).Name = Sheets(1).Cells(i, 1)
Next
End Sub
7. 输入完后就可以把VBE窗口关闭了，接下来我们再点击开发工具上的“插入/按钮”菜单项。
8. 接下来在表格中拖动鼠标，建立一个按钮，然后会弹出指定宏窗口，选择“重命名”一项，最后点击确定按钮。
9. 接下来，再点击开发工具下的“设计模式”按钮，将这个状态取消。
10. 然后点击一下我们刚刚新建的那个按钮，会发现下面的sheet表全都重命名了，效果如下图。
以上就是excel2016将工作表一次性批量重命名的方法。

本周热门

本月热门