您现在的位置是:首页 > Excel技巧>一键删除工作表中的所有图形

工作表中的图形怎么批量删除-一键删除工作表中的所有图形

发布于2022-04-150人已围观

在日常办公中，尤其是对于经常做报告的办公白领们，有时候，我们需要对活动工作表中的所有图形进行删除，比如工作表中的图片，图表，艺术字，插入的批注以及大量的多边形标注等等。如何批量删除呢？

如下图，通过VBA代码快速删除

工作表中的图形怎么批量删除

代码如下：

Sub 删除图形()

Dim Shp As Shape

For Each Shp In ActiveSheet.Shapes

Shp.Delete

Next Shp

End Sub

添加按钮或者其他直接调用这个函数即可。

共0条评论