excel中使用vba给工作表批量改名
工具/原料
excel2013
更多经验请关注，如果帮到了你，请在上方给个投票谢谢支持。好人一生平安。
先顶后看年薪百万，如果帮到了你，帮忙给个好评，这对小编很重要，万分感谢。
方法/步骤
1、首先我们打开一个工作样表作为例子。
2、可以看到工作薄中有两个工作表一个是5月工资，一个是sheet1。我们要做的就是使用vba将两个工作表进行改名操作。
3、虽然使用常规的操作能够很方便擢爻充种的改名，但是如果工作表比较多，那么一个的修改是非常麻烦的，比如每一次操作都要选取工作表然后在进行重新改名输入。
4、我们捂执涡扔使用alt+f11组合快捷键进入vbe编辑器，插入一个新的模块，并在模块中输入以下代码：OptionExplicitSubsetcap()DimiAsIntegerFori=惺绅寨瞀1ToWorksheets.CountWorksheets(i).Name="更改后的名字"&iNextEndSub
5、这里我们可以看到使用这个代码后，将工作薄中的两个表，更改为统一的名字，并以序列号进行了排序。
6、我使腩柽鬣盛用了一个for循环，历遍了该工作薄中的所有工作表，并使用name方法将对象进行重命名为“更改后的名字”。&是连接符连接了i变量来为工作表命名。
