首页officeexcel正文

excel工作表批量重命名的方法

强国说学习2021-12-29406重命名方法批量工作excel


excel工作表重命名的方法有下面几种:
第一,单击菜单“格式”——“工作表”——“重命名”。
第二,单击工作表标签,右键选择“重命名”。
第三,双击工作表标签,直接对工作表重命名。
上面三种方法,都可以对Excel工作表重命名,不过都是一个一个工作表分别重命名。
如何做到excel工作表批量重命名呢?有下面两种方法,供参考:
第一种:利用Excel工作表现有单元格内容进行批量重命名。
例如:Excel工作表默认标签为sheet1,sheet2,sheet3,sheet4。如何快速重命名为1月销售表,2月销售表,3月销售表,4月销售表。
sheet1工作表A1:A4单元格内容是1月销售表,2月销售表,3月销售表,4月销售表。
方法:按下ALT+F11,打开VBE窗口,单击插入——模块,复制下面代码,并运行。
Sub按A列数据修改表名称()
OnErrorResumeNext'忽略错误继续执行VBA代码,避免出现错误消息
Application.Calculation=xlCalculationManual'手动重算
Dimi%
Fori=1ToSheets.Count
Sheets(i).Name=Cells(i,1).Text
Next
OnErrorGoTo0'恢复正常的错误提示
Application.Calculation=xlCalculationAutomatic'自动重算
EndSub
第二种:直接批量重命名Excel工作表。
Sub新工作表名()
DimiAsLong
Application.ScreenUpdating=False
Fori=1ToWorksheets.Count
Worksheets(i).Name="报表"&i
Nexti
Application.ScreenUpdating=True
EndSub
上面5种方法,想必能帮你解决Excel工作表批量重命名的问题。

如想转载该文章请注明出处:强国说学习-qiangguoshuo.com
强国说学习

转载声明:本站发布文章及版权归原作者所有,转载本站文章请注明文章来源!

本文链接:https://www.qiangguoshuo.com/excel/3909.html