Wie erstelle ich einen Ordner zum Organisieren von E-Mails mit bestimmten Personen in Outlook?

Überwältigt von einem überfüllten Posteingang? In diesem Tutorial werde ich drei Methoden vorstellen, um E-Mails mit bestimmten Personen in Outlook effizienter zu organisieren.

Verschieben Sie E-Mails mit bestimmten Personen immer in einen erstellten Ordner

1. Klicken Sie mit der rechten Maustaste auf das E-Mail-Konto, für das Sie einen Ordner zum Organisieren von E-Mails erstellen möchten, und wählen Sie es aus Neuer Ordner aus dem Rechtsklickmenü und benennen Sie den Ordner.

2. Wählen Sie in Ihrem Ordner Posteingang oder Gesendete Objekte eine der E-Mail-Nachrichten mit einer bestimmten E-Mail-Adresse aus, deren E-Mails Sie in den erstellten Ordner verschieben möchten.

3. Auf der Home Registerkarte, in der Bewegung Gruppe, klicke auf Regeln > Nachrichten immer verschieben von: bestimmte E-Mail-Adresse und / oder Regeln > Nachrichten immer verschieben nach: bestimmte E-Mail-Adresse nach Ihren Bedürfnissen.

4. Geben Sie im Popup-Dialogfeld Regeln und Warnungen den Ordner an, in den Sie die Nachrichten verschieben möchten, und klicken Sie dann auf OK.

5. Die E-Mails im Ordner Posteingang oder Gesendete Objekte, die die Bedingungen erfüllen, werden nun in den Ordner verschoben, den Sie gerade erstellt haben. Und die zukünftigen E-Mail-Nachrichten werden auch direkt in den Ordner verschoben, wenn sie die Bedingungen erfüllen.

Erstellen Sie einen Suchordner, um E-Mails automatisch für bestimmte Personen zu organisieren

Wenn Sie die Nachrichten nicht in einen Ordner verschieben, sondern einfach nur anzeigen möchten. Sie können in Outlook einen Suchordner erstellen, der es Ihnen ermöglicht, E-Mail-Nachrichten, die bestimmten Kriterien entsprechen, in mehreren Ordnern zu finden, sie aber in ihren ursprünglichen Ordnern zu behalten.

1. Auf der Mappe Registerkarte, in der Neu Gruppe, klicke auf Neuer Suchordner.

2. Gehen Sie im Popup-Dialogfeld „Neuer Suchordner“ wie folgt vor:

• 1) Wählen Sie im Feld Suchordner auswählen in der Liste E-Mail von Personen und Listen aus Mail von und an bestimmte Personen, oder E-Mail von bestimmten Personen wie du es brauchst.
• 2) Klicken Sie im Feld Suchordner anpassen auf Auswählen um Personen aus Ihrer Adressliste auszuwählen.
• 3) Geben Sie das E-Mail-Konto an, von dem aus E-Mails gesucht werden sollen.
• 4) Klicken Sie auf OK.

3. Unter Suchordner wird ein Suchordner erstellt, der die E-Mail-Nachrichten enthält, die die Bedingungen erfüllen.

Stapelweise Ordner erstellen, um E-Mails für alle Ihre E-Mail-Konten mit VBA zu organisieren

Wenn Sie mehrere E-Mail-Konten in Outlook haben und Ordner für jedes E-Mail-Konto stapelweise für bestimmte Personen erstellen möchten, können Sie die VBA-Methode verwenden, um die Nachrichten mit bestimmten Personen aus den Ordnern „Posteingang“ oder „Gesendet“ Ihrer E-Mail-Konten zu verschieben. Bitte gehen Sie wie folgt vor.

1. Klicken Sie in Ihrem Outlook auf Reichen Sie das > Optionen > Trust Centerund klicken Sie dann auf Vertrauensstellungscenter.

2. Wechseln Sie im Popup-Dialog zu MakroeinstellungenWählen Aktivieren Sie alle Makros, und prüfe Wenden Sie Makrosicherheitseinstellungen auf installierte Add-Ins an.

3 Klicken OK Schaltflächen zum Schließen der Dialoge.

4. Drücken Sie die Taste Andere + F11 Tasten zum Öffnen des Fensters Microsoft Visual Basic für Applikationen.

5 Klicken Insert > Modul. Kopieren Sie dann einen der folgenden VBA-Codes in das Modulfenster.

VBA-Code 1: Stapelweise Ordner erstellen, um E-Mails mit bestimmten Absendern in den Posteingängen aller E-Mail-Konten zu organisieren

Sub MailArchiveSenderInInbox()
'Update by ExtendOffice
Dim I As Integer
Dim xAccount As Account
Dim xItem As Object
Dim xMail As MailItem
Dim xNewFolder As Folder
Dim xInboxFolder As Folder
Dim xSenderAddress As String
Dim xRecipient As Recipient
Dim xFolderName As String
xFolderName = "NewFolder" 'Replace "NewFolder" with desired folder name
Const PR_SMTP_ADDRESS = "http://schemas.microsoft.com/mapi/proptag/0x39FE001E"
On Error Resume Next
For Each xAccount In Application.Session.Accounts
  Set xInboxFolder = xAccount.DeliveryStore.GetDefaultFolder(olFolderInbox) 'Replace "olFolderInbox" with "olFolderSentMail" if you want to find messages in Sent folders
  Set xNewFolder = Nothing
  Set xNewFolder = xAccount.DeliveryStore.GetRootFolder.Folders(xFolderName)
  If xNewFolder Is Nothing Then
    Set xNewFolder = xAccount.DeliveryStore.GetRootFolder.Folders.Add(xFolderName)
  End If
  For I = xInboxFolder.Items.Count To 1 Step -1
    Set xItem = xInboxFolder.Items.Item(I)
    If xItem.Class = olMail Then
      Set xMail = xItem
      xSenderAddress = ""
      If xMail.Sender.Type = "EX" Then
        xSenderAddress = xMail.Sender.PropertyAccessor.GetProperty(PR_SMTP_ADDRESS)
      Else
        xSenderAddress = xMail.SenderEmailAddress
      End If
      If xSenderAddress = "" Then
        xSenderAddress = xMail.SenderEmailAddress
      End If
      If VBA.InStr(xSenderAddress, "") <> 0 Then 'Replace the email address in double quotes
        xMail.Move xNewFolder
      End If
    End If
  Next
  If xNewFolder.Items.Count = 0 Then
    xNewFolder.Delete
    xAccount.DeliveryStore.GetDefaultFolder(olFolderDeletedItems).Folders(xFolderName).Delete
  End If
Next
Set xInboxFolder = Nothing
Set xNewFolder = Nothing
End Sub

Hinweis: Sie sollten bestimmte Ausschnitte gemäß den Kommentaren in der 12., 16. und 35. Zeile des obigen VBA-Codes ersetzen.

VBA-Code 2: Stapelerstellung von Ordnern zum Organisieren von E-Mails mit bestimmten Empfängern in den Posteingängen aller E-Mail-Konten

Sub MailArchiveRecipientInInbox()
'Update by ExtendOffice
Dim I As Integer
Dim xAccount As Account
Dim xItem As Object
Dim xMail As MailItem
Dim xNewFolder As Folder
Dim xInboxFolder As Folder
Dim xSenderAddress As String
Dim xRecipient As Recipient
Dim xFolderName As String
xFolderName = "NewFolder" 'Replace "NewFolder" with desired folder name
Const PR_SMTP_ADDRESS = "http://schemas.microsoft.com/mapi/proptag/0x39FE001E"
On Error Resume Next
For Each xAccount In Application.Session.Accounts
  Set xInboxFolder = xAccount.DeliveryStore.GetDefaultFolder(olFolderSentMail) 'Replace "olFolderInbox" with "olFolderSentMail" if you want to find messages in Sent folders
  Set xNewFolder = Nothing
  Set xNewFolder = xAccount.DeliveryStore.GetRootFolder.Folders(xFolderName)
  If xNewFolder Is Nothing Then
    Set xNewFolder = xAccount.DeliveryStore.GetRootFolder.Folders.Add(xFolderName)
  End If
  For I = xInboxFolder.Items.Count To 1 Step -1
    Set xItem = xInboxFolder.Items.Item(I)
    If xItem.Class = olMail Then
      Set xMail = xItem
      xSenderAddress = ""
      For Each xRecipient In xMail.Recipients
'        If xRecipient.Type = olCC Then   'To find CC recipients. Replace "olCC" with "olBCC" to find BCC recipients
            xSenderAddress = xSenderAddress & ", " & xRecipient.PropertyAccessor.GetProperty(PR_SMTP_ADDRESS)
            If xSenderAddress = "" Then
              xSenderAddress = xSenderAddress & ", " & xRecipient.Address
            End If
'        End If
      Next
      If VBA.InStr(xSenderAddress, "") <> 0 Then 'Replace the email address in double quotes
        xMail.Move xNewFolder
      End If
    End If
  Next
  If xNewFolder.Items.Count = 0 Then
    xNewFolder.Delete
    xAccount.DeliveryStore.GetDefaultFolder(olFolderDeletedItems).Folders(xFolderName).Delete
  End If
Next
Set xInboxFolder = Nothing
Set xNewFolder = Nothing
End Sub

Hinweis:

• 1) Sie sollten bestimmte Ausschnitte gemäß den Kommentaren in der 12., 16. und 35. Zeile des obigen VBA-Codes ersetzen.
• 2) Um Nachrichten zu archivieren, die einen bestimmten CC- oder BCC-Empfänger enthalten, kommentieren Sie die 28. und 33. Zeile aus, indem Sie das Apostroph (') am Anfang der Zeilen löschen.

6. Drücken Sie F5 um den VBA-Code auszuführen. Und neue Ordner werden erstellt, wenn Nachrichten die Bedingungen erfüllen.

In Verbindung stehende Artikel

---

Beste Office-Produktivitätstools

Kutools for Outlook - Über 100 leistungsstarke Funktionen zur Optimierung Ihres Outlooks

🤖 KI-Mail-Assistent: Sofortige Profi-E-Mails mit KI-Magie – geniale Antworten mit einem Klick, perfekter Ton, mehrsprachige Beherrschung. Verwandeln Sie den E-Mail-Versand mühelos! ...

📧 E-Mail Automation: Abwesenheit (verfügbar für POP und IMAP)  /  Planen Sie das Senden von E-Mails  /  Automatisches CC/BCC nach Regeln beim E-Mail-Versand  /  Automatische Weiterleitung (erweiterte Regeln)   /  Begrüßung automatisch hinzufügen   /  Teilen Sie E-Mails mit mehreren Empfängern automatisch in einzelne Nachrichten auf ...

📨 E-Mail-Management: E-Mails einfach abrufen  /  Blockieren Sie betrügerische E-Mails nach Betreff und anderen  /  Doppelte E-Mails löschen  /  Erweiterte Suche  /  Ordner konsolidieren ...

📁 Anhänge Pro: Batch speichern  /  Stapeltrennung  /  Stapelkomprimierung  /  Automatisches Speichern   /  Automatische Trennung  /  Automatische Komprimierung ...

???? Schnittstellenmagie: 😊Mehr hübsche und coole Emojis   /  Steigern Sie Ihre Outlook-Produktivität mit Registerkartenansichten  /  Ausblick minimieren statt schließen ...

👍 Wunder mit einem Klick: Allen mit eingehenden Anhängen antworten  /   Anti-Phishing-E-Mails  /  🕘Zeitzone des Absenders anzeigen ...

👩🏼‍🤝‍👩🏻 Kontakte und Kalender: Fügen Sie Kontakte aus ausgewählten E-Mails im Stapel hinzu  /  Teilen Sie eine Kontaktgruppe in einzelne Gruppen auf  /  Geburtstagserinnerungen entfernen ...

Auf über 100 Eigenschaften Warten Sie auf Ihre Erkundung! Klicken Sie hier, um mehr zu erfahren.

Weiterlesen       Free Download      Bezug von MarvelClient