Outlook VBA调用Excel执行Quit后进程仍无法正常关闭

核心问题原因 #

你测试时用到的Set exApp = Excel.Application写法，是导致后台Excel进程不退出的根源。这种写法会触发VBA对Excel类型库的自动提前绑定，运行时会隐式生成一份对新建Excel进程的COM引用计数。
哪怕你显式执行了exApp.Quit、把自己声明的exApp变量设为Nothing，这份由VBA运行时持有的隐式引用不会被主动释放。Excel进程会一直判定当前仍有外部客户端连接，不会主动终止，只能等宿主Outlook关闭时随进程一并销毁。
你代码里设置的关闭事件响应、关闭弹窗提示、隐藏窗口这些配置本身没有问题，但无法解决COM引用计数卡滞的核心矛盾。

具体修正步骤 #

• 替换Excel实例的获取逻辑，改用晚绑定的CreateObject方法新建独立实例，切断VBA对Excel类型库的隐式绑定路径，从根源上避免额外的隐式引用生成。
• 不要在Outlook的VBA工程中手动添加“Microsoft Excel xx.x Object Library”的提前引用，所有Excel相关的对象变量统一声明为Object类型，全程走晚绑定逻辑。
• 如果后续业务操作中用到了Excel的工作簿、工作表等二级对象，必须按照从子对象到父对象的顺序逐个释放：先将所有用到的Workbook、Worksheet对象设为Nothing，最后再释放最外层的Application对象。如果二级对象没有释放，它们持有的反向引用会导致Application的引用计数无法降到0，同样会造成进程无法正常退出。

修正后的可复现测试代码 #

Public Sub Test()
    MsgBox "Trying"
    ' 用Object类型实现晚绑定，不依赖提前添加的Excel类型库引用
    Dim exApp As Object
    ' 用CreateObject新建独立Excel实例，替代直接调用Excel.Application的写法
    Set exApp = CreateObject("Excel.Application")
    
    exApp.EnableEvents = False
    exApp.DisplayAlerts = False
    exApp.Visible = False
    
    ' 业务逻辑示例：若操作了工作簿对象，必须在Quit前先释放子对象
    ' Dim testWb As Object
    ' Set testWb = exApp.Workbooks.Add()
    ' ' 执行业务操作...
    ' Set testWb = Nothing
    
    exApp.Quit
    Set exApp = Nothing
    MsgBox "Finished"
End Sub

效果验证 #

代码运行完成后可直接打开任务管理器查看后台进程，正常情况下执行完exApp.Quit语句后，对应的Excel进程会立刻消失，不会等到Outlook关闭才退出，该方案在Office 2010和Office 2016环境下均可正常生效。

内容的提问来源于stack exchange，提问作者SammuelMiranda