Using the NewMail Event and NewMailEx Event : Outlook NameSpace « Outlook « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Outlook
  3. Outlook NameSpace

Using the NewMail Event and NewMailEx Event

 
Sub Application_NewMail()
    If MsgBox("You have new mail. Do you want to see your Inbox?", _
        vbYesNo + vbInformation, "New Mail Alert") = vbYes Then
        Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox).Display
    End If
End Sub








Related examples in the same category

1.Accessing Other Folders within the NameSpace Object
2.Creating a New Folder
3.Deleting a Folder
4.Understanding General Methods for Working with Outlook Objects
5.Returns the NameSpace and uses the CurrentUser property to display the name of the current user in a message box:
6.Accessing Default Folders within the NameSpace Object
7.olFolderContacts
8.olFolderDeletedItems,
9.olFolderDrafts,
10.olFolderInbox,
11.olFolderJournal,
12.olFolderNotes,
13.olFolderOutbox,
14.olFolderSentMail,
15.olFolderTasks,
16.olPublicFoldersAllPublicFolders.