i have a problem with a vba Event Application.DocumentBeforeClose.... thats not fired in this example. Application.DocumentBeforeSave works fine.

Under Windows 10 with Word 2016 works all fine...

Any ideas?

thank you

Option Explicit
Dim appWord As New AppClass

Sub Register_Event_Handler()
   Set appWord.oApp = Word.Application
End Sub

Sub AutoOpen()
    MsgBox ("auto open")
End Sub
Option Explicit
Public WithEvents oApp As Word.Application

Private Sub oApp_DocumentBeforeClose(ByVal doc As Document, Cancel As Boolean)
  MsgBox("document before close event")
End Sub

Private Sub oApp_DocumentBeforeSave(ByVal doc As Document, SaveAsUI As Boolean, Cancel As Boolean)
  MsgBox("document before save event")
End Sub