如何用vba批量删除工作簿内所有工作表上的图形对象?

您所在的位置:网站首页 批量删除excel隐藏对象 如何用vba批量删除工作簿内所有工作表上的图形对象?

如何用vba批量删除工作簿内所有工作表上的图形对象?

2023-09-03 16:34| 来源: 网络整理| 查看: 265

如何用vba批量删除工作簿内所有工作表上的图形对象? 2017年2月1日 作者:水星Excel 5,918 次浏览 暂无评论

单击F5快捷键→定位条件→对象→确定 可以一次性选中当前工作表的所有图形对象,然后通过DEL键删除。

但是如果要删除的对象位于多个工作表,且不清楚具体是在哪几个工作表时,使用如下的VBA代码将会更加的便捷。

Sub QQ1722187970() Dim oWK As Worksheet Dim oSP As Shape '遍历所有工作表 For Each oWK In Excel.ThisWorkbook.Sheets '遍历所有图形对象 For Each oSP In oWK.Shapes oSP.Delete Next Next End Sub

 

 

 

其它相关文章推荐:如何在excel中用vba把所有图形对象导出为图片格式的文件?如何用vba在excel工作表中添加直线?如何用vba遍历word文档的图形对象?如何在vba中批量对多个工作表执行相同的操作?如何用vba在工作表中创建添加表单控件、窗体控件、 ActiveX控件?如何彻底解决用vba批量删除ppt幻灯片中的图形等对象? 分类 :  VBA , VBA 基础知识 标签 :  shape , 图形        

声明: 本站文章均属原创,未经作者同意必须保留此段声明,且在文章页面明显位置给出原文链接,否则视为侵权。如果想要每天都收到本站的技术文章推送,可以微信搜索公众号:水星Excel或者Excel_Office关注。其它事宜请加QQ:1722187970 或微信号:xycgenius 联系。 



【本文地址】


今日新闻


推荐新闻


CopyRight 2018-2019 办公设备维修网 版权所有 豫ICP备15022753号-3