Zum Hauptinhalt springen

Wie verschiebt man eine E-Mail-Nachricht nach dem Lesen in einen bestimmten Ordner in Outlook?

Author: Siluvia Last Modified: 2025-05-28

Das Verschieben von E-Mail-Nachrichten in einen bestimmten Ordner nach dem Lesen ist eine der besten Möglichkeiten, den Posteingang in Outlook sauber zu halten. Viele Outlook-Benutzer neigen dazu, für diese gelesenen E-Mails eine Regel zu erstellen. Tatsächlich unterstützt Outlook diesen Regel-Assistenten-Prozess nicht. In diesem Artikel zeigen wir Ihnen, wie Sie E-Mail-Nachrichten nach dem Lesen mit VBA-Code in Outlook in einen bestimmten Ordner verschieben.

E-Mail-Nachricht nach dem Lesen in einen bestimmten Ordner in Outlook verschieben

Office Tab - Aktivieren Sie die Registerkartenbearbeitung und den Registerkartennavigation in Microsoft Office und machen Sie die Arbeit zum Kinderspiel.
Entsperren Sie jetzt die kostenlose Version von Kutools für Outlook und genießen Sie über 70 Funktionen mit unbegrenztem Zugriff für immer.
Boosten Sie Ihr Outlook 2024 - 2010 oder Outlook 365 mit diesen erweiterten Funktionen. Genießen Sie über 70 leistungsstarke Funktionen und steigern Sie Ihr E-Mail-Erlebnis!

E-Mail-Nachricht nach dem Lesen in einen bestimmten Ordner in Outlook verschieben

Sie können E-Mail-Nachrichten nach dem Lesen durch Ausführen eines VBA-Codes in Outlook in einen bestimmten Ordner verschieben.

1. Zuerst müssen Sie einen neuen Ordner namens „Reviewed“ unter dem Posteingang erstellen.

a new folder

2. Öffnen Sie den Posteingang, dann drücken Sie bitte die Tasten Alt + F11, um das Microsoft Visual Basic for Applications-Fenster zu öffnen.

3. Erweitern Sie dann Project1 > Microsoft Outlook Objects > ThisOutlookSession durch Doppelklick, um den VbaProject.OTM -Editor zu öffnen.

the VbaProject.OTM editor

4. Kopieren und fügen Sie dann den folgenden VBA-Code in den VbaProject.OTM-Editor ein, wie im obigen Screenshot gezeigt.

VBA-Code: Nachrichten nach dem Lesen verschieben

Sub MoveInbox2Reviewed()
On Error Resume Next
Set oOutlook = CreateObject("Outlook.Application")
Set oNamespace = oOutlook.GetNamespace("MAPI")
Set oFolderSrc = oNamespace.GetDefaultFolder(olFolderInbox)
Set oFolderDst = oFolderSrc.Folders("Reviewed")
Set oFilteredItems = oFolderSrc.Items.Restrict("[UnRead] = False")
For Each oMessage In oFilteredItems
    oMessage.Move oFolderDst
Next
End Sub 

5. Klicken Sie dann auf die Schaltfläche Speichern, um den VBA-Code zu speichern, und schließen Sie dann das Microsoft Visual Basic for Applications-Fenster.

6. Klicken Sie mit der rechten Maustaste auf die Symbolleiste für den Schnellzugriff und wählen Sie Symbolleiste für den Schnellzugriff anpassen aus dem Kontextmenü aus. Siehe Screenshot:

the Customize Quick Access Toolbar buton

7. Im Dialogfeld Outlook-Optionen müssen Sie:

1). Makros in der Dropdown-Liste Befehle auswählen auswählen;

2). Wählen Sie Project1. ThisOutlookSession im Feld unter der Dropdown-Liste Befehle auswählen;

3). Klicken Sie auf die Schaltfläche Hinzufügen;

4). Klicken Sie auf die Schaltfläche OK.

the Outlook Options dialog box

8. Dann sehen Sie die Makro-Schaltfläche in der Symbolleiste für den Schnellzugriff. Stellen Sie sicher, dass Sie sich im gewünschten Posteingang befinden, aus dem Sie alle gelesenen Nachrichten verschieben möchten, und klicken Sie dann auf die Makro-Schaltfläche, um den VBA-Code im Posteingang auszuführen.

the Macro button

Hinweise:

1. Dieser VBA-Code kann in Outlook 2007, 2010 und 2013 angewendet werden; jedoch können Sie in Outlook 2007 direkt auf die Schaltfläche Ausführen klicken, um den Code auszuführen.

2. Wenn es mehrere E-Mail-Konten in Ihrem Outlook gibt, kann der VBA-Code nur im Konto angewendet werden, dessen Datendatei als Standard festgelegt ist. Sie können die Standarddatendatei überprüfen, indem Sie auf Datei > Info > Kontoeinstellungen > Kontoeinstellungen klicken, um das Kontoeinstellungen Dialogfeld zu öffnen. Gehen Sie dann zum Datendatei Reiter, dort sehen Sie die Standarddatendatei, die markiert ist mit the check mark zuvor.

the Account Settings dialog box

3. Wenn Sie die Standarddatendatei auf ein anderes E-Mail-Konto ändern möchten, wählen und markieren Sie bitte das Konto, das Sie als Standard festlegen möchten, und klicken Sie dann auf Als Standard festlegen im Dialogfeld Kontoeinstellungen.

4. Wenn Sie den VBA-Code das erste Mal ausführen und feststellen, dass die gelesenen Nachrichten nicht sofort verschoben werden, klicken Sie bitte weiterhin auf die Makro-Schaltfläche, bis alle gelesenen Nachrichten im Posteingang verschoben sind.


Beste Office-Produktivitätstools

Eilmeldung: Kutools für Outlook startet kostenlose Version!

Erleben Sie die brandneue kostenlose Version von Kutools für Outlook mit über70 unglaublichen Funktionen, die Sie FÜR IMMER nutzen können! Klicken Sie jetzt, um herunterzuladen!

🤖 Kutools AI : Nutzt fortschrittliche KI-Technologie, um E-Mails mühelos zu bearbeiten, einschließlich Antworten, Zusammenfassen, Optimieren, Erweitern, Übersetzen und Verfassen von E-Mails.

📧 E-Mail-Automatisierung: Automatische Antwort (Verfügbar für POP und IMAP) / E-Mails senden planen / Automatische CC/BCC nach Regeln beim Senden von E-Mails / Automatische Weiterleitung (Erweiterte Regeln) / Automatische Begrüßung hinzufügen / Automatisches Aufteilen von E-Mails mit mehreren Empfängern in einzelne Nachrichten ...

📨 E-Mail-Management: E-Mails zurückrufen / Betrugs-E-Mails nach Betreff und anderen blockieren / Duplikate E-Mails löschen / Erweiterte Suche / Ordner organisieren ...

📁 Anhänge Pro: Stapelspeichern / Stapelablösen / Stapelkomprimieren / Automatisch speichern / Automatisch abtrennen / Automatische Komprimierung ...

🌟 Interface Magic: 😊Mehr hübsche und coole Emojis / Erinnern Sie, wenn wichtige E-Mails kommen / Outlook minimieren statt schließen ...

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

👩🏼‍🤝‍👩🏻 Kontakte & Kalender: Kontakte aus ausgewählten E-Mails stapelweise hinzufügen / Eine Kontaktgruppe in einzelne Gruppen aufteilen / Geburtstagserinnerung entfernen ...

Entsperren Sie Kutools für Outlook sofort mit einem Klick. Warten Sie nicht, laden Sie jetzt herunter und steigern Sie Ihre Effizienz!

kutools for outlook features1 kutools for outlook features2