Excel Application.Quit 不会终止 EXECL.EXE 进程

Question

我发现 Excel 的 Quit 有一些奇怪的行为。我找不到解释或解决方案的命令。

下面的 VBScript 脚本复制了该问题。这就是它的作用……

创建一个新的 Excel 实例

打开和关闭一定数量的工作簿(由 WorkbooksToCreate 控制)

尝试 Quit Excel

然后通过更改Visible来证明Excel是否真的退出了。状态返回 True

我收集到的是一个成功的 Quit仅在 WorkbooksToCreate 时发生设置为 0 或 1。如果设置为 2 或更高，Excel 将无法正常退出。

'Switch this between 1 and 2 to see the difference
'(1 = quit correctly, 2 = quit only changes the .visible to false)
Const WorkbooksToCreate = 2

'Create new Excel Instance
Set xlApp = CreateObject("Excel.Application")
xlApp.Visible = True

'Add, and then close workbooks
For w = 1 to WorkbooksToCreate
    Set WB = xlApp.Workbooks.Add
    WB.Close False
Next

'Attempt to Quit Excel
xlApp.Quit

'Test it really did quit
xlApp.Visible = True

Set xlApp = Nothing

我在 Windows 7 上使用 Excel 2010。

我已经尝试了很多变体，但无法确定问题所在。我能说的最好的就是所有 xlApp.Quit在这种情况下，确实等价于 xlApp.Visible = False
有兴趣看看你们是否有更好的运气，或者是否有人注意到 Excel 的类似行为？

谢谢

Answer 1

+1 给@omegastripes 和@Mikegrann 用于识别这一点并非在每台机器上都会发生。

我进行了进一步调查，发现问题是我自己的工作笔记本电脑特有的。该问题无法在其他机器上复制。

但我已经成功追踪并修复了故障。它是由一个名为 CiscoClickToCall.Connect 的特定 COM 加载项引起的。 .卸载后，脚本开始按预期运行，并成功退出。

我可能不必从 Windows 完全卸载它；从 Excel 中删除加载项就足够了，但它是一个我没有任何用途的应用程序，所以我把它去掉了。

据我所知，所有加载项的目的是将上下文菜单命令添加到单元格的右键单击中。

感谢大家的帮助