excel表格怎么将工作表批量设置重命名
时间:2023-01-08 15:23:51
常用excel表格的朋友精彩会遇到工作表更名的问题,工作表不多单个点击并不费事,不过就怕遇到工作表很多的情况,那么如何快捷给工作表更名呢?下面小编为大家介绍下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列数据修改表名称()
On Error Resume Next ‘忽略错误继续执行VBA代码,避免出现错误消息
Application.Calculation = xlCalculationManual ’手动重算
Dim i%
For i = 1 To Sheets.Count
Sheets(i).Name = Cells(i, 1).Text
Next
On Error GoTo 0 ‘恢复正常的错误提示
Application.Calculation = xlCalculationAutomatic ’自动重算
End Sub
第二种:直接批量重命名Excel工作表。
Sub 新工作表名()
Dim i As Long
Application.ScreenUpdating = False
For i = 1 To Worksheets.Count
Worksheets(i).Name = “报表” & i
Next i
Application.ScreenUpdating = True
End Sub
以上内容便是excel批量重命名的教程了,相信可以帮助你解决问题,大家可以关注教程之家,里面有更多的精彩教程。
![](/images/zang.png)
![](/images/jiucuo.png)
猜你喜欢
excel怎么输入大于15位的数字?excel中显示大于15位数的数值的方法介绍
Win10专业版如何开启休眠模式唤醒?
![](https://img.aspxhome.com/file/2023/8/50028_0s.png)
word怎么给特定文字添加边框
win10没有注册类别怎么处理
![](https://img.aspxhome.com/file/2023/8/46818_0s.jpg)
excel工作簿根据身份证计算退休时间
![](https://img.aspxhome.com/file/2023/5/a142195_0s.png)
Word2007如何关闭安全警告
怎样让Excel每次启动是自动打开固定的工作簿的方法步骤
![](https://img.aspxhome.com/file/2023/4/42974_0s.jpg)
Windows10系统怎么自定义WinX菜单?自定义WinX菜单方法
![](https://img.aspxhome.com/file/2023/1/52651_0s.jpg)
office办公软件是一种什么软件
Win11提示该文件没有与之关联的应用来执行如何解决?
![](https://img.aspxhome.com/file/2023/5/53255_0s.jpg)
Win10 1909默认安装盘怎么修改?Win10 1909默认安装盘修改教程
![](https://img.aspxhome.com/file/2023/0/48770_0s.jpg)
wps表格如何使用透视表功能
![](https://img.aspxhome.com/file/2023/1/53551_0s.jpg)
如何用Word制作常用公文
Word怎么处理图片?
![](https://img.aspxhome.com/file/2023/1/34831_0s.gif)
Word2007中怎样裁剪图片
金山WPS文档怎么添加版权说明
![](https://img.aspxhome.com/file/2023/2/a163992_0s.jpg)
win10平板模式怎么分屏?win10平板模式分屏方法教程?
![](https://img.aspxhome.com/file/2023/1/47311_0s.jpg)
360装机大师能装Win10系统吗?360装机大师怎么装Win10系统?
![](https://img.aspxhome.com/file/2023/4/52234_0s.png)
在Word2010文档中设置SmartArt样式
![](https://img.aspxhome.com/file/2023/3/20503_0s.jpg)
如何在Excel2010中将条件格式转换成普通格式
![](https://img.aspxhome.com/file/2023/4/36284_0s.jpg)