excel 如何将工作表名改为工作表内指定的固定单元格的值?
时间:2023-09-23 08:34:15
我有很多工作表,需要将工作表名改为工作表内指定的固定单元格的值,有什么好方法么?
简单,一段VBA搞定。【Alt+F11】打开VBA窗口,【插入】——【模块】,将下面这段代码粘贴进去,按F5运行就可以了。 Public Sub果果( ) For i=1 To Sheets.Count Sheets(i).Name=Sheets(i).Cells(1,2) Next End Sub
小白:哇,好厉害,但是为什么只有前四个工作表完成了批量改名,最后一个工作表没有改,而且出现了报错呢?
果果:那是因为你的最后一个工作表里面有合并单元格啊,只要在代码里面加一句On Error Resume Next再运行,在遇到错误的时候就会自动跳过,而不弹出错误提示对话框了。
小白:如果我只想取单元格值里的一部分字符作为工作表名,例如不要前两个字符“一只”,可以实现吗?
果果:在工作表里,这类取单元格一部分字符的问题,一般可以使用Left、Right、Mid、Len等函数嵌套来实现。VBA里的解决方法大同小异,代码如下: Sheets(i).Name=Right(Sheets(i).Cells(1,2),Len(Sheets(i).Cells(1,2))-2)
最终完整代码: Public Sub果果() On Error Resume Next For i=1 To Sheets.Count Sheets(i).Name=Right(Sheets(i).Cells(1,2),Len(Sheets(i).Cells(1,2))-2) Next End Sub
下面这张图片,是大家总结的结果:
标签:excel,如何,将,工,作表,名,改为,工作,表内,指
0
投稿
猜你喜欢
石墨文档可以添加音频吗_石墨文档可否添加音频详情
2022-10-02 13:47:13
word文档设置密码怎么设置?word文档设置密码技巧分享
2022-07-14 11:27:30
wps文字怎么设置为不能复制粘贴
2023-03-15 11:27:19
Whiteboard无法打开怎么办?Whiteboard无法打开的解决方法
2022-10-24 23:45:42
Win8.1如何手动更改OneNote屏幕截图快捷键Win+S
2023-07-07 02:53:12
如何使用wps演示模板
2022-07-03 12:47:41
雷神911MT暗杀星重装系统教程 石大师一键重装系统win10教程
2023-06-03 10:03:08
电脑怎么备份系统?电脑备份系统的方法
2023-05-31 10:59:50
如何确定我的Mac或Linux是否易受到Shellshock攻击?
2023-06-24 22:56:02
在Mac电脑上如何调整用户界面缩放比例?
2022-07-17 07:09:56
Win7显示未安装任何音频输出设备的解决方法
2022-07-19 23:17:54
win10前面板耳机没声音怎么办?前置面板耳机没声音的解决方法
2023-04-09 01:56:15
windows 7文件夹选项不见了如何找回
2023-04-12 06:51:00
Win7删除文件或文件夹提示“找不到该项目”错误该如何解决
2023-07-01 11:10:56
Win10无法连接网络怎么解决?
2023-08-07 11:53:37
Win10 20H1预览版18912官方ISO镜像下载
2022-04-23 18:09:49
Excel中isnumber函数功能的使用方法
2022-07-02 07:14:28
电脑版WPS怎么快速生成非零售商品条形码
2022-11-05 07:29:47
Excel无法正常排序的常见原因介绍
2022-11-07 04:40:57
巧改win7资源管理器的指向目标的秘方
2023-03-15 01:24:50