Hoe u automatisch alle inkomende e-mails van specifieke personen in Outlook opent

Outlook biedt geen functie om automatisch alle inkomende e-mails van specifieke personen te openen. Daarom zal dit artikel een dergelijke methode aan u blootstellen.

Het is zeker dat u geen e-mails van de uiterst belangrijke personen wilt missen, zoals de e-mails van uw leidinggevende. In dit geval kunt u de Outlook-regel gebruiken om een ​​bepaalde waarschuwing weer te geven wanneer dergelijke e-mails in uw mailbox aankomen. Afgezien hiervan wilt u misschien ook dat Outlook dergelijke e-mails automatisch opent. Hoewel het niet wordt ondersteund door de Outlook-regel, kunt u het nog steeds realiseren via Outlook VBA. Nu, in het volgende, zullen we een stukje VBA-code onthullen om u te helpen. Lees verder om het te krijgen.

Open automatisch alle inkomende e-mails van specifieke personen

  1. Aan start met, open de Outlook VBA-editor door te verwijzen naar "Hoe u VBA-code in uw Outlook uitvoert'.
  2. Open vervolgens het "ThisOutlookSession" -project en kopieer de volgende VBA-code erin.
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-code - Open automatisch alle inkomende e-mails van specifieke personen

  1. Daarna restart uw Outlook-toepassing om deze macro te activeren.
  2. Nu kunt u het proberen. Verplaats gewoon een e-mail die afkomstig is van specifieke afzenders naar Inbox. Deze e-mail wordt meteen automatisch geopend in een eigen venster.Automatisch geopende e-mail van een specifieke persoon

Los vervelende Outlook-problemen op

Op voorwaarde dat u Outlook al tientallen jaren gebruikt, is het zeer waarschijnlijk dat u diverse fouten en problemen bent tegengekomen. Als starAls u uw Outlook gebruikt, heeft u een foutbericht ontvangen waarin wordt vermeld dat uw Outlook PST-bestand niet toegankelijk is. Deze fout duidt meestal op PST-corruptie. In dit geval zou u dat moeten doen repareer PST het dossier. Het kan behoorlijk knoestig zijn als u alleen de inbox-reparatietool gebruikt. Maar als u een beroep doet op een krachtiger en betrouwbaarder hulpmiddel, zoals DataNumen Outlook Repair, zou de taak veel gemakkelijker zijn.

Auteur Introductie:

Shirley Zhang is een expert op het gebied van gegevensherstel in DataNumen, Inc., de wereldleider in technologieën voor gegevensherstel, waaronder SQL repareren en Outlook-reparatiesoftwareproducten. Voor meer informatie bezoek www.datanumen.com

Reacties zijn gesloten.