急!EXCEL VBA高手请进,我在线等。

来源:百度知道 编辑:UC知道 时间:2024/06/19 09:28:52
在EXCEL中如何用VBA实现在退出工作簿时,对指定表单的用户控件全部删除?并保存表单上的数据。请EXCEL VBA高手赐教,我我先谢谢了!

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Worksheets("sheet1").DrawingObjects.Select
Selection.Delete
End Sub

把你的删除控件的代码放在 ThisWorkbook 的BeforeClose 事件里

如下所示:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
sheet1.Activate
Sheet1.控件名.Select '删除Sheet1中的名字为“控件名”的控件
Selection.Delete

End Sub

在WOOKBOOK.CLOSE 中设置一下试试!