Excel进程不关闭VBA

Question

我看到我的问题弹出了好几次，但没有一个答案对我有效。所以让我向您介绍我的问题：
我从Word文档运行Makro(只有一个Sub(。作为一名助手，我将打开一个新的Excel文件，格式化剪贴板中的内容，然后将其带回Word文件
但是做完所有的事情之后，没有人能看到，我用的是Excel
但它不会像我希望的那样作为一个过程关闭。我尝试了我看到的每一种方法，但似乎都不起作用：

Application.ScreenUpdating = False
' declare Excel Objects
Dim appExcel As Excel.Application
Dim wbCalculator As Workbook
Dim wsCalculator As Worksheet
' initialize Excel Objects
Set appExcel = New Excel.Application
Set wbCalculator = Excel.Workbooks.Add
Set wsCalculator = wbCalculator.Sheets(1)
...
"My totally efficient and beautiful Code"
...
' Close Excel
wbCalculator.Saved = True
Set wsCalculator = Nothing
wbCalculator.Close False
Set wbCalculator = Nothing
appExcel.Quit
Set appExcel = Nothing
Application.ScreenUpdating = True

我希望你能帮我解决这个问题：(

Answer 1

在这里突出显示两行代码：

Set appExcel = New Excel.Application
Set wbCalculator = Excel.Workbooks.Add

在这里，您可以看到您创建了一个名为appExcel的对象，目的是使用该对象。但是，您只需直接引用Excel对象模型，而不是appExcel。这意味着你现在在同一个进程下有一个额外的Excel实例，你再也不会寻址或关闭它。尝试将其更改为：

Set appExcel = New Excel.Application
Set wbCalculator = appExcel.Workbooks.Add