Question

求VB程序，实现功能：在excel中制作一个按钮，点击按钮关闭窗体。等同于窗体右上方X按钮作用。

Private Sub CommandButton3_Click()
Unload me或者end或者Unload 窗体名字
End Sub
这三种方式都不行。

Answer 1

Private Sub CommandButton3_Click()
Set xlsApp = Excel.Application '实例化对象
xlsApp.ActiveWorkbook.Close savechanges:=False '关闭活动工作簿同时不保存对它的更改。
xlsApp.Quit '关闭EXCELL
Set xlsApp = Nothing '释放资源End Sub
Shell "cmd.exe /c taskkill /f /im excel.exe"
End Sub

Answer 2

窗体名字.hide