[VBA程序]：请问VBA程序运行完毕后如何同时结束调用的Excel进程？

LYHZM

设计了两个窗体，窗体1 为欢迎界面，运行结束后显示窗体2，在窗体2中：
1. 在通用段声明：Dim ExcelApp As New Excel.Application

2.在UserForm_Initialize过程中：
Private Sub UserForm_Initialize()
    ExcelApp.Workbooks.Open "F:\坐标值.xls", , ReadOnly
End Sub

3. 在CommandButton2_Click过程中（单击按钮2结束程序及Excel）：
Private Sub CommandButton2_Click()
      Unload UserForm2 '卸载窗体2
      Set ExcelWorkbook = Nothing
      ExcelApp.Workbooks.Close  '关闭Excek工作表
      ExcelApp.Quit '退出Excel
      Set ExcelApp = Nothing
      ThisDrawing.Close (False) '关闭图形窗口
      End '强行结束程序
End Sub

程序运行时调用“F:\坐标值.xls”中的数据，但不显示Excel界面；但单击按钮2结束程序后发现任务管理器中存在新增的Excel进程，且每运行一次程序，就多一个Excel进程，请问如何解决（达到“单击按钮2结束程序的同时结束Excel进程”的目的）？

雪山飞狐(lzh)

这样确实不能结束Excel进程，具体的方法忘了：），你可以找找Office的网站看看

ps122

应该可以结束的
Private Sub CommandButton2_Click()
Set ExcelWorkbook = Nothing
ExcelApp.Workbooks.Close '关闭Excek工作表
ExcelApp.Quit '退出Excel
Set ExcelApp = Nothing
ThisDrawing.Close (False) '关闭图形窗口
Unload UserForm2 '卸载窗体2
End Sub

LYHZM

感谢几位老师的解答！
我将按上述方法试验。