我在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中,在“信任”中心中启用“所有宏”。
任何想法都将不胜感激。
答案 0 :(得分:0)
如果Outlook正在快速关闭,则Application.Quit
将不会触发。
最好的办法是在最后一个可见的Explorer.Close
对象上Explorer
。