Hur man automatiskt öppnar alla inkommande e-postmeddelanden från specifika personer i Outlook

Outlook tillhandahåller inte en funktion för att automatiskt öppna alla inkommande e-postmeddelanden från specifika personer. Således kommer denna artikel att exponera en sådan metod för dig.

Det är säkert att du inte vill missa några e-postmeddelanden från de extremt viktiga personerna, till exempel e-postmeddelanden från din chef. I det här fallet kan du använda Outlook-regeln för att visa en viss varning när sådana e-postmeddelanden kommer till din brevlåda. Bortsett från detta kan du också önska att Outlook automatiskt öppnar sådana e-postmeddelanden. Även om det inte stöds av Outlook-regeln kan du fortfarande inse det via Outlook VBA. Nu, i det följande, kommer vi att avslöja en bit VBA-kod för att hjälpa dig. Läs vidare för att få det.

Öppna automatiskt alla inkommande e-postmeddelanden från specifika personer

  1. Till start med, öppna Outlook VBA-redigeraren genom att hänvisa till “Hur du kör VBA-kod i din Outlook".
  2. Öppna sedan projektet “ThisOutlookSession” och kopiera följande VBA-kod till det.
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

VBA-kod - Öppna automatiskt alla inkommande e-postmeddelanden från specifika personer

  1. Efter det, restart ditt Outlook-program för att aktivera detta makro.
  2. Nu kan du prova. Flytta bara ett e-postmeddelande från specifika avsändare till inkorgen. Omedelbart öppnas detta e-postmeddelande automatiskt i sitt eget fönster.Autoöppnad e-post från specifik person

Lös irriterande Outlook-problem

Förutsatt att du har använt Outlook i årtionden är det mycket troligt att du måste ha stött på diverse fel och problem. Till exempel när starNär du fick din Outlook fick du ett felmeddelande om att din Outlook PST-fil är otillgänglig. Detta fel indikerar vanligtvis PST-korruption. I det här fallet måste du göra det fixa PST fil. Det kan vara mycket knotigt om du bara använder reparationsverktyget för inkorgen. Ändå, om du använder ett mer kraftfullt och pålitligt verktyg, till exempel DataNumen Outlook Repairskulle uppgiften vara mycket enklare.

Författarintroduktion:

Shirley Zhang är expert på dataåterställning DataNumen, Inc., som är världsledande inom teknik för återställning av data, inklusive fixa sql och Outlook-programvara för reparationsprogramvara. För mer information besök www.datanumen.com

Kommentarer är stängda.