用VB代码删除EXCEL表格工作簿中的所有工作表的条件格式
如一个工作簿中有,有100个工作表,但是想一次性的清除所有的工作表中的条件格式,如何用VB代码一次性清除。...
如一个工作簿中有,有100个工作表,但是想一次性的清除所有的工作表中的条件格式,如何用VB代码一次性清除。
展开
3个回答
展开全部
代码不是唯一的。教你一个方法自己找到适合的代码:用录制宏的方法,删除其中两三个工作表中的条件格式及3到8行,录制后到VBA编辑器查看产生的代码,然后在产生的代码基础上进行适当修改,就形成你容易理解的代码了。
用这样的方法,能解决很多你不熟悉的代码问题,能帮助你学习VBA代码,这样,不但能知其然,还能知其所以然。
关于如何修改代码以及相关方法,欢迎来百度hi沟通交流。
用这样的方法,能解决很多你不熟悉的代码问题,能帮助你学习VBA代码,这样,不但能知其然,还能知其所以然。
关于如何修改代码以及相关方法,欢迎来百度hi沟通交流。
追问
我录制过,但是代码不像是楼上给我的代码,我录制过后的代码不能通用,比我把工作表命名更改了就没办法删除了。还有我怎么HI到你呢?
追答
录制后的代码,是傻瓜式的代码,它有助于你学会代码。至于要变成通用代码,经过简单修改即可。要hi到我,只需添加我的百度hi账号即可。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2012-07-19 · 知道合伙人软件行家
关注
展开全部
Sub aa()
Dim c
For Each c In ThisWorkbook.Sheets
c.Cells.FormatConditions.Delete
Next
End Sub
Dim c
For Each c In ThisWorkbook.Sheets
c.Cells.FormatConditions.Delete
Next
End Sub
更多追问追答
追问
能不能再帮我添加一个帮我删除每个工作表的第三、四、五、六、七、八行?
追答
Sub aa()
Dim c
For Each c In ThisWorkbook.Sheets
c.Cells.FormatConditions.Delete
c.Rows("3:8").Delete
Next
End Sub
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
增加一个不用VB的方式,希望给你多个选择:全选工作表,复制,选择性粘贴为值和数字格式。
只是多个工作表需要多次操作。
只是多个工作表需要多次操作。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |