Code that fires whenever an email arrives...

[J S]

I have some vba code in the ThisOutlookSession Module that causes some code
to run whenever an email arrives in the inbox.

Normally, this works fine except when I open up the VBA enviroment and do
some editing. Then the olInboxItems_ItemAdd event stop firing until I
restart outlook. Does anybody know why this is occuring and if I can stop
this behavior?

-J

Private WithEvents olInboxItems As Items
------------------------------------------------------------------
Private Sub Application_Startup()

Dim objNS As NameSpace
Set objNS = Application.GetNamespace("MAPI")
' instantiate objects declared WithEvents
Set olInboxItems = objNS.GetDefaultFolder(olFolderInbox).Items
Set objNS = Nothing
End Sub

 

[Ken Slovak - [MVP - Outlook]]

That is expected behavior if you are editing the VBA project code.
After you are done just place the cursor in the Application_Startup
event handler and press F5 to execute it again and your ItemAdd
handler should start working again.