How to Auto Open All Incoming Emails from Specific Persons in Outlook

Outlook doesn’t provide a feature to automatically open all incoming emails from specific persons. Thus, this article will expose such a method to you.

It is sure that you don’t want to miss any emails from the extremely important persons, such as the emails from your superior. In this case, you can make use of Outlook rule to display a particular alert when such emails arrive in your mailbox. Apart from this, you may also wish Outlook to auto open such emails. Although it is not supported by Outlook rule, you still can realize it via Outlook VBA. Now, in the followings, we will expose a piece of VBA code to help you. Please read on to get it.

Auto Open All Incoming Emails from Specific Persons

1. To start with, access Outlook VBA editor by referring to “How to Run VBA Code in Your Outlook“.
2. Subsequently, open the “ThisOutlookSession” project and copy the following VBA code into it.

Public WithEvents objInbox As Outlook.Folder
Public WithEvents objInboxItems As Outlook.Items

Private Sub Application_Startup()
    Set objInbox = Outlook.Application.Session.GetDefaultFolder(olFolderInbox)
    Set objInboxItems = objInbox.Items
End Sub

'Occurs when incoming emails arrive in Inbox
Private Sub objInboxItems_ItemAdd(ByVal Item As Object)
    Dim objMail As Outlook.MailItem
    Dim strSenders As String
    Dim varSenders As Variant
    Dim i As Long
 
    If TypeOf Item Is MailItem Then
       Set objMail = Item
 
       'Change the specific persons
       strSenders = "bob_black@datanumen.com; shelly@datanumen.com; kim@datanumen.com"
 
       varSenders = Split(strSenders, ";")
 
       'Open the emails from specific persons
       For i = 0 To UBound(varSenders)
           If objMail.SenderEmailAddress = varSenders(i) Then
              objMail.Display
              Exit For
           End If
       Next
    End If
End Sub

3. After that, restart your Outlook application to activate this macro.
4. Now, you can have a try. Just move an email which is from specific senders to Inbox. At once, this email will be automatically opened in its own window.

Solve Annoying Outlook Problems

Provided that you have utilized Outlook for decades, it’s very likely that you must have come across miscellaneous errors and troubles. For instance, when starting your Outlook, you received an error message mentioning that your Outlook PST file is inaccessible. This error usually indicates PST corruption. In this case, you’d be required to fix PST file. It could be considerably knotty if you only employ the inbox repair tool. Yet, if you take recourse to a more powerful and reliable tool, such as DataNumen Outlook Repair, the task would be far easier.

Author Introduction:

Shirley Zhang is a data recovery expert in DataNumen, Inc., which is the world leader in data recovery technologies, including fix sql and outlook repair software products. For more information visit www.datanumen.com