Как да отваряте автоматично всички входящи имейли от конкретни хора в Outlook

Outlook не предоставя функция за автоматично отваряне на всички входящи имейли от определени лица. Следователно тази статия ще ви разкрие такъв метод.

Сигурно е, че не искате да пропуснете никакви имейли от изключително важни хора, като например имейлите от вашия началник. В този случай можете да използвате правилото на Outlook, за да покажете конкретно предупреждение, когато такива имейли пристигнат във вашата пощенска кутия. Освен това може също да пожелаете Outlook автоматично да отваря такива имейли. Въпреки че не се поддържа от правилото на Outlook, все пак можете да го реализирате чрез Outlook VBA. Сега, по-долу, ще изложим част от кода на VBA, за да ви помогнем. Моля, прочетете, за да го получите.

Автоматично отваряне на всички входящи имейли от определени лица

1. Към start с достъп до Outlook VBA редактор, като се обърнете към „Как да стартирате VBA код във вашия Outlook".
2. След това отворете проекта „ThisOutlookSession“ и копирайте следния VBA код в него.

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. След това, резtart вашето приложение Outlook, за да активирате този макрос.
4. Сега можете да опитате. Просто преместете имейл, който е от определени податели, във Входящи. Веднага този имейл ще се отвори автоматично в собствен прозорец.

Решаване на досадни проблеми с Outlook

При условие, че сте използвали Outlook от десетилетия, много вероятно е да сте попадали на различни грешки и проблеми. Например, когато starдокато използвате Outlook, сте получили съобщение за грешка, в което се споменава, че вашият PST файл на Outlook е недостъпен. Тази грешка обикновено показва повреда на PST. В този случай ще трябва да коригирайте PST файл. Може да е доста заплетено, ако използвате само инструмента за поправка на входящата кутия. И все пак, ако прибягвате до по-мощен и надежден инструмент, като напр DataNumen Outlook Repair, задачата би била много по-лесна.

Въведение на автора:

Шърли Джанг е експерт по възстановяване на данни в DataNumen, Inc., която е световен лидер в технологиите за възстановяване на данни, включително поправям sql и outlook софтуерни продукти за ремонт. За повече информация посетете WWW.datanumen.com