EXCEL重命名100多个工作表，用这个方法只要5分钟！

案例：将工作簿中15个部门的工作表重命名为，代码 部门名。

步骤：

第一步，导入VBA模板文件，打开需重命名工作表的EXCEL文档，按ALT F11 调出VBA 编辑器 →在工程窗口右键选择【导入文件】→选择VBA 模块文件（批量重命名工作表.bas）→关闭VBA 编辑器。

第二步，批量获取工作表名，点【开发工具】→【宏】→选择宏“目录”→【执行】，新建了一个新的工作表“汇总目录”，所有工作表的名称都放在了汇总目录的A列，并建立了链接。

第三步，确定工作表对应的新名称。在B2列输入工作表代码， A01至A15，在C列输入公式：=B2&”-”&A2，用公式批量生成新的工作表名。

第四步，点【开发工具】→【宏】→选择宏“重命名工作表”→【执行】

由于案例的工作表只有15个，用时不到2分钟，所有工作表已按要求完成重命名，这个方法超级实用，超级快速，有兴趣的小伙伴赶紧试试吧！

动图演示：