打开工作表，点击开发工具中的Visual Basic选项。
在VBA工程窗口中，右键点击左侧的ThisWorkbook，依次选择插入和模块即可。
在模块1的代码窗口中输入指定的VBA代码。
按下F5键或点击VBA编辑器中的运行按钮执行程序，系统将自动完成工作表的复制、重命名及标签颜色修改等操作。
VBA程序执行完毕后，应及时删除该模块，防止再次运行时因工作表名称冲突而报错。删除前应先将模块导出，或把代码复制保存至记事本、Word等文档中，以便后续重复使用，确保程序可追溯和复用。
方法/步骤
从A2单元格起准备新名称，对应工作表内容，A1单元格用于存放标题字段。
新名称准备就绪后，右键点击任意工作表标签选择查看代码，或使用ALT+F11快捷键打开VBE对话框。
打开VBE界面，右键点击ThisWorkbook，选择插入模块即可。
双击模块，在代码框中输入以下内容
Sub 重命名()
Dim i&
Next
End Sub
记住后可直接粘贴使用，代码通用。
点击开发工具选项卡，在控件组中选择按钮控件。若该选项卡未显示，可参考前文方法将其调出。
在空白区域拖动鼠标绘制合适大小的按钮，再右键点击选择指定宏。
选择重命名后点击确定即可。
8
点击按钮查看效果，文件已全部重命名成功，学会了吗？
