So öffnen Sie automatisch alle eingehenden E-Mails von bestimmten Personen in Outlook

Outlook bietet keine Funktion zum automatischen Öffnen aller eingehenden E-Mails von bestimmten Personen. In diesem Artikel wird Ihnen daher eine solche Methode vorgestellt.

Es ist sicher, dass Sie keine E-Mails von äußerst wichtigen Personen verpassen möchten, wie z. B. die E-Mails Ihres Vorgesetzten. In diesem Fall können Sie die Outlook-Regel verwenden, um eine bestimmte Warnung anzuzeigen, wenn solche E-Mails in Ihrem Postfach ankommen. Abgesehen davon möchten Sie möglicherweise auch, dass Outlook solche E-Mails automatisch öffnet. Obwohl es von der Outlook-Regel nicht unterstützt wird, können Sie es dennoch über Outlook VBA realisieren. Im Folgenden stellen wir Ihnen einen Teil des VBA-Codes zur Verfügung, um Ihnen zu helfen. Bitte lesen Sie weiter, um es zu bekommen.

Alle eingehenden E-Mails von bestimmten Personen automatisch öffnen

1. Um zunächst auf den Outlook VBA-Editor zuzugreifen, verwenden Sie dazu die folgende Anleitung:So führen Sie VBA-Code in Outlook aus".
2. Öffnen Sie anschließend das Projekt „ThisOutlookSession“ und kopieren Sie den folgenden VBA-Code hinein.

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. Starten Sie anschließend Ihre Outlook-Anwendung neu, um dieses Makro zu aktivieren.
4. Jetzt können Sie es versuchen. Verschieben Sie einfach eine E-Mail, die von bestimmten Absendern stammt, in den Posteingang. Diese E-Mail wird sofort automatisch in einem eigenen Fenster geöffnet.

Lösen Sie störende Outlook-Probleme

Wenn Sie Outlook schon seit Jahrzehnten nutzen, sind Ihnen mit ziemlicher Sicherheit schon diverse Fehler und Probleme begegnet. Beispielsweise erhielten Sie beim Starten von Outlook eine Fehlermeldung, dass Ihre Outlook-PST-Datei nicht zugänglich ist. Dieser Fehler deutet in der Regel auf eine beschädigte PST-Datei hin. In diesem Fall müssten Sie … PST beheben Datei. Es kann sehr knorrig werden, wenn Sie nur das Reparaturwerkzeug für den Posteingang verwenden. Wenn Sie jedoch auf ein leistungsfähigeres und zuverlässigeres Tool zurückgreifen, wie z DataNumen Outlook Repairwäre die Aufgabe weitaus einfacher.

Einführung des Autors:

Shirley Zhang ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich Fix SQL und Outlook-Reparatursoftwareprodukte. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX