Hi. I am a beginner.
I have implemented the following code in ThisOutlookSession, Module, & Class and none will fire when a new message is received. FYI: other code works fine.
Dim WithEvents myOlApp As Outlook.Application
Sub Initialize_handler()
MsgBox "stop"
Set myOlApp = CreateObject("Outlook.application")
End Sub
Private Sub myOlApp_NewMail()
MsgBox "stop"
Call SyncSchedule
End Sub
I have implemented the following code in ThisOutlookSession, Module, & Class and none will fire when a new message is received. FYI: other code works fine.
Dim WithEvents myOlApp As Outlook.Application
Sub Initialize_handler()
MsgBox "stop"
Set myOlApp = CreateObject("Outlook.application")
End Sub
Private Sub myOlApp_NewMail()
MsgBox "stop"
Call SyncSchedule
End Sub