Outlook Application_Quit事件不会触发

时间:2019-12-09 21:34:21

标签: outlook outlook-vba

我在ThisOutlookSession模块中有一个事件:

Public Sub Application_Quit()
    Dim fso As Object
    Dim rootFolder As String
    Dim oFolder As Object
    Dim oFile As Object
    Dim filename As String
    Dim fullpath As String
    ...Procedure...
End Sub

触发时,它将正常工作。但是,除非我在会话期间打开了VBE编辑器,否则不会触发Quit事件。例如,如果我打开Outlook并立即将其关闭,则_Quit事件将不会触发。如果再次打开Outlook,打开编辑器,然后关闭Outlook,则_Quit事件将按预期触发。

有关类似问题,请参见here-尽管我已经尝试了此处列出的所有内容,但均未成功。更改事件的私人/公共状态,重新启动PC,这些似乎没有任何效果。我添加了一个空白的Public _Startup事件,该事件也没有任何作用。

_Quit事件中的特定过程是无关紧要的-我已经尝试在其中仅具有一个简单的Msgbox,并且观察到相同的行为。

我在Windows 10企业版的Outlook 2013中,在“信任”中心中启用“所有宏”。

任何想法都将不胜感激。

1 个答案:

答案 0 :(得分:0)

如果Outlook正在快速关闭,则Application.Quit将不会触发。
最好的办法是在最后一个可见的Explorer.Close对象上Explorer