- 90
- 0
- 约2.61千字
- 约 10页
- 2020-06-03 发布于湖北
- 举报
.
EXCEL中如何批量重命名工作表名称?
作为一名报表制作者或者我们工作中制作大量工作表的小伙伴, 经常会遇到大量
工作表需要重命名, 一个一个修改实在是太麻烦, 尤其量大的情况下, 那么有没
有批量处理的办法呢?答案肯定是有的;只有想不到没有做不到。
工具 / 原料
.
.
电脑一台
OFFICE-EXCEl2007及以上版本( 2003 略有差异)
方法 / 步骤
1. 1
首先,我们来准备新的名字,对应相应的工作表,从 A2 单元格开始,
A1 存放标题字段。
.
.
2. 2
新名字全部准备好后, 然后任意工作表标签右击, 点击查看代码, 或者
ALT+F 11 快捷键,调出 VBE对话框。
.
.
3. 3
进入 VBE对话框后,右击 thisworkbook, 选择插入,然后选择模块。
.
.
4. 4
双击模块,进入代码输入框输入一下代码
Sub 重命名 ()
Dim i
For i = 2 To Sheets.Count
Sheets(i).Name = Sheets(1).Cells(i, 1)
.
.
Next
End Sub
也可以记住,下次直接粘贴即可,代码通用。
5. 5
然后点击开发工具选项卡, 在控件下面选择按钮控件 (开发工具选项卡
一般默认是没有的,具体可参考我前面的经验,有具体介绍如何调出)
.
.
6. 6
在空白处,拖动鼠标,画出一个大小适合的按钮, 然后右击选择制定宏。
.
原创力文档

文档评论(0)