excelVBA运行时错误1004 此名称已被使用 怎么修改一下
Sub按A列数据批量修改表名称()Dimi%Fori=2ToSheets.CountSheets(i).Name=Cells(i+1,1).TextNextEndSub...
Sub 按A列数据批量修改表名称()
Dim i%
For i = 2 To Sheets.Count
Sheets(i).Name = Cells(i + 1, 1).Text
Next
End Sub 展开
Dim i%
For i = 2 To Sheets.Count
Sheets(i).Name = Cells(i + 1, 1).Text
Next
End Sub 展开
1个回答
展开全部
这是因为重命名时，名字重名了。
遇到重名时，忽略继续执行即可。
Sub 按A列数据批量修改表名称()
Dim i%
For i = 2 To Sheets.Count
on error resume next
Sheets(i).Name = Cells(i + 1, 1).Text
Next
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
金山毒霸
2024-10-31 广告
电脑在启动游戏或软件的时候，桌面弹出错误提示框“0xc0000094”，应该怎么办？电脑报错，很大可能是因为某些DLL文件出现了异常，比如感染了病毒、DLL文件丢失等。解决方法如下：一、 手动解决方法1、先确定电脑操作系统是多少位的，现在的...
点击进入详情页
本回答由金山毒霸提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
