Dobrý den
Jaké jsou možnosti pro zprovoznění kódu který něco udělá při nějaké události ve VBA

Zkouším něco takového a nejede to

Private Sub oAppEvents_OnCloseView(ByVal ViewObject As View, ByVal BeforeOrAfter As EventTimingEnum, ByVal Context As NameValueMap, HandlingCode As HandlingCodeEnum)
  If BeforeOrAfter = kBefore Then
    MsgBox "OnCloseView kBefore", vbInformation, "AppEvent"
  End If
 
  If BeforeOrAfter = kAfter Then
MsgBox "OnCloseView kAfter", vbInformation, "AppEvent"
  End If
End Sub