VBA 如何清除 excel中的各种按钮

假设要清楚Sheet1中的各种按钮，在VBA中复制如下语句，运行即可：
Sub main（）
Sheet1.DrawingObjects.Delete

end sub

关于此例中用到的DrawingObjects的相关知识：
VBA中图形对象一般使用Shapes，但Shapes不支持Select方法，只支持Selectall，也不支持Delete方法，所以在对图形对象进行删除时，就要用到图形对象集合的另外一个称呼——DrawingObjects对象，以下代码为选择活动工作表中的所有图形对象：
Activesheet.DrawingObjects.Select
当然除了支持Select方法，DrawingObjects还支持Delete方法，所以对于图形对象进行删除时，就可以用上述例子中的语句来实现，即：
Activesheet.DrawingObjects.Delete

如果你的这个工作表上 没有其他的 图形等不能删除的 图形对象的话 可以使用如下方法：
代码：
ActiveSheet.Shapes.SelectAll
Selection.Delete

ctrl+g 或者F5 打开定位窗口 定位条件 对象 选中所有的……然后按 删除键删除……
这个方法需要 控件箱工具设计按钮有效的时候 才可以使用……否则 选择按钮 无效……代码不分是否是处于设计状态……
那么你把你的 所谓“按钮” 贴图出来 或者 发文件过来了三二七三九一四零一

第一步:F5→定位→对象
第二步:按下键盘delete键

按F5——定位条件——对象——delete

F5定位，选择对象，然后DEL即可