马兰花开耿为华专辑二:如何用宏关闭Excel2000

来源:百度文库 编辑:高考问答 时间:2024/07/08 16:18:33

Dim aaaa As Excel.Application

Private Sub Workbook_Open()
Set aaaa = CreateObject("Excel.Application")
aaaa.Visible = True
MsgBox "已创建新Excel实例"
aaaa.Quit
MsgBox "已关闭Excel实例"
Set aaaa = Nothing
End Sub