excel里定位所有对象并全部删除
发布网友
发布时间：2022-02-24 20:30
共2个回答
热心网友
时间：2022-02-24 21:59
我的方法只能每次删除一个工作簿（即Excel文件）内的所有需删除堆箱
其实有个简单方法，利用查找实现的
1、打开查找窗口，“编辑”》查找或者Ctrl+F
依次点击”选项“、范围》工作表、查找全部
2、若是只是删除单元格内的值，点击上图中”替换“
3、若是需要把单元格一起删除，选中下图中红框部分（每次只能选中一个工作表的）
在右键点击下图中绿框区域，删除。完成后再次在重复上一步操作（即选中》右键删除）
热心网友
时间：2022-02-24 23:17
Sub deleteDrawingObjects()
a = ThisWorkbook.Sheets.Count
For i = 1 To a
Worksheets(i).DrawingObjects.Delete
Next i
End Sub
加入进去，执行这个宏
