Sub
main（）
Sheet1.DrawingObjects.Delete
end
sub
关于此例中用到的DrawingObjects的相关知识：
VBA中图形对象一般使用Shapes，但Shapes不支持Select方法，只支持Selectall，也不支持Delete方法，所以在对图形对象进行删除时，就要用到图形对象集合的另外一个称呼——DrawingObjects对象，以下代码为选择活动工作表中的所有图形对象：
Activesheet.DrawingObjects.Select
当然除了支持Select方法，DrawingObjects还支持Delete方法，所以对于图形对象进行删除时，就可以用上述例子中的语句来实现，即：
Activesheet.DrawingObjects.Delete
basic-点击控件工具箱-选中命令按钮-放入你要的制定位置。
VBA 如何清除 excel中的各种按钮
Activesheet.DrawingObjects.Delete
如何编制VBA语句删除excel表中所有控件
遍历所有控件，逐个删除就可以了。举例说明：例如有表格如图：第一步：插入模块，编写代码如下：Sub test()Sheets("sheet1").ActivateFor Each myc In ActiveSheet.Shapesmyc.DeleteNext mycEnd Sub第二步：运行宏test。如图：结果如图：
VBA如何禁用Excel工作簿右上角最大化按钮(中间方块按钮)?
插入一模块,然后把上述代码复制过去。执行宏RemoveX，即可去除最大最小化按钮。
excel vba 如何彻底删除sheet1中的所有按钮
可用下面的语句。如果要按名称删除，可以加一个判断语句。Dim objShp As Object For Each objShp In ActiveSheet.Shapes objShp.Delete Next
VBA中如何一次性清空窗体数据和添加表格当中的数据
看来你写VBA没问题，我就不多说基本操作了。要实现你的要求。你只需要给那个“清除”键的Click事件写一段代码，要清除Excel表中的数据只需要一句：activesheet.cells.clear 要清除窗体中的数据，这需要有点前提条件，假设你对控件的命名很有规则，比如你全部是使用的TextBox来完成数据输入的，而这些Text...
vba中怎么清空工作表中的数据?
首先我们打开一个工作样表作为例子。excel中使用vba清除工作表内容 使用alt+f11组合快捷键进入vbe编辑器，插入一个新的模块，并在模块中输入以下代码：Option Explicit Sub ddt()'ActiveCell.CurrentRegion.Select 'Range(ActiveCell.End(xlUp), ActiveCell.End(xlDown)).Select Range("A1").ClearContents '...
vba 清空excel内容
在excel中，按Alt+F11，在左侧导航栏点击右键→插入→模块。在右侧输入代码：Sub 清除() Sheets(2).Cells.ClearContentsEnd Sub 在表格中，点击插入→形状→矩形，并在表格中添加，添加之后，在形状中点击右键→指定宏→清除。
excel表格中怎么设置一键清零键,清除指定几个不连续单元格的数据。
1、添加一个ActiveX按钮控件 2、在VBA中添加模块，然后在模块中写入VBA代码 实例（清除D2、D3、D4单元格的值）：Sub Clear()Worksheets("Sheet1").Range("D2,D3,D4").ClearContents End Sub 3、右键单击按钮，选择‘指定宏’，然后选择需要使用的宏---Clear ...
如何将Excel中的所有对象都清除掉
1. **打开VBA编辑器**：在Excel中，按下`Alt + F11`键打开VBA编辑器。2. **插入模块**：在VBA编辑器中，点击“插入”菜单，选择“模块”，然后在打开的代码窗口中粘贴相应的VBA代码。3. **编写代码**：编写一个宏来遍历所有工作表，并删除其中的所有对象。具体代码取决于对象的类型（如图片、...
excel表格:如何用VBA自动删除工作表的模块和按钮控件?
另存为.xlsx文件后自动删除原带有程序的文件（程序最后加载自动删除Kill 命令）上面说我回答不完善，那我就告诉你百度什么是完善的答案！！！答案就是我删除这个百度帐号，再也不回答这些狗屁问题了，回答10个问题9个让你完善答案，一个无效回答，玩个屁！！！
