Direkt zum Inhalt

Wie verschiebe ich eine E-Mail-Nachricht nach dem Lesen in Outlook in einen bestimmten Ordner?

Das Verschieben von E-Mail-Nachrichten in einen bestimmten Ordner nach dem Lesen ist der beste Weg, um den Posteingangsordner in Outlook sauber zu halten. Viele Outlook-Benutzer erstellen in der Regel eine Regel für das Verschieben dieser gelesenen E-Mails. Tatsächlich unterstützt Outlook diesen Regelassistenten nicht. In diesem Artikel zeigen wir Ihnen, wie Sie E-Mail-Nachrichten nach dem Lesen mit VBA-Code in Outlook in den angegebenen Ordner verschieben.

Verschieben Sie die E-Mail-Nachricht nach dem Lesen in Outlook in den angegebenen Ordner

Office-Registerkarte – Ermöglichen Sie das Bearbeiten und Durchsuchen mit Registerkarten in Microsoft Office und machen Sie die Arbeit zum Kinderspiel
Kutools für Outlook – Steigern Sie Outlook mit über 100 erweiterten Funktionen für überragende Effizienz
Verbessern Sie Ihr Outlook 2021 – 2010 oder Outlook 365 mit diesen erweiterten Funktionen. Genießen Sie eine umfassende 60-tägige kostenlose Testversion und verbessern Sie Ihr E-Mail-Erlebnis!

Pfeil blau rechte BlaseVerschieben Sie die E-Mail-Nachricht nach dem Lesen in Outlook in den angegebenen Ordner

Sie können E-Mail-Nachrichten nach dem Lesen mit VBA-Code in Outlook in einen bestimmten Ordner verschieben.

1. Zunächst müssen Sie einen neuen Ordnernamen erstellen. “Bewertet”Unter dem Ordner Posteingang.

2. Öffnen Sie den Ordner Posteingang und drücken Sie die Taste Andere + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.

3. Doppelklicken Sie dann zum Erweitern Project1 > Microsoft Outlook-Objekte > DieseOutlookSession öffnen VbaProject.OTM Editor.

4. Kopieren Sie anschließend den folgenden VBA-Code und fügen Sie ihn 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 Speichern Klicken Sie auf die Schaltfläche, um den VBA-Code zu speichern, und schließen Sie dann die Microsoft Visual Basic für Applikationen Fenster.

6. Klicken Sie mit der rechten Maustaste auf Quick Access Toolbar, und wählen Sie Anpassen der Symbolleiste für den Schnellzugriff aus dem Kontextmenü. Siehe Screenshot:

7. In dem Outlook-Optionen Dialogfeld müssen Sie:

1). Wählen Makros der Wählen Sie Befehle aus Dropdown-Liste;

2). Wählen Projekt 1. ThisOutlookSession in der Box unter dem Wählen Sie Befehle aus Dropdown-Liste;

3). Drücke den Speichern Taste;

4). Drücke den OK .

8. Dann können Sie die sehen Makro Schaltfläche in der Quick Access Toolbar. Stellen Sie sicher, dass Sie sich in dem Posteingangsordner befinden, aus dem Sie alle gelesenen Nachrichten verschieben möchten, und klicken Sie dann auf Makro Schaltfläche, um den VBA-Code im Posteingang auszuführen.

Notizen:

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

2. Wenn in Ihrem Outlook mehrere E-Mail-Konten vorhanden sind, kann der VBA-Code nur in dem Konto angewendet werden, dessen Datendatei als Standard festgelegt ist. Sie können die Standarddatendatei überprüfen, indem Sie auf klicken Reichen Sie das > Info > Kontoeinstellungen > Kontoeinstellungen öffnen Kontoeinstellungen Dialogbox. Dann geh zum Datendatei Auf der Registerkarte sehen Sie, dass die Standarddatendatei durch markiert ist vor.

3. Wenn Sie die Standarddatendatei in ein anderes E-Mail-Konto ändern möchten, wählen Sie das Konto aus, das Sie als Standard festlegen möchten, und markieren Sie es. Klicken Sie dann auf Als Standard einstellen der Kontoeinstellungen Dialogbox.

4. Wenn Sie den VBA-Code zum ersten Mal ausführen und feststellen, dass die gelesenen Nachrichten nicht auf einmal verschoben werden, klicken Sie so lange auf die Schaltfläche Makro, bis alle gelesenen Nachrichten im Posteingang verschoben wurden.


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 ProBatch 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.

 

 

 

Comments (10)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
What if Only want to move read messages not from the main Inbox but from an Inbox sub-folder to the "Reviewed" folder?
This comment was minimized by the moderator on the site
What if Only want to move read messages not from the main Inbox but from an Inbox sub-folder to the "Reviewed" folder?
This comment was minimized by the moderator on the site
I used this VBA code, but now all of the emails moved to "Reviewed" are gone? Any ideas why?
This comment was minimized by the moderator on the site
has anyone had this not work the second time you tried to apply it?
This comment was minimized by the moderator on the site
Buongiorno


Esiste la versione per Outlook 365 in italiano (non so se cambia qualcosa). Grazie
This comment was minimized by the moderator on the site
What line do I add when I only want this rule to apply to emails with a subject line including a word or text?
This comment was minimized by the moderator on the site
Where's all the Dim's?????????????????????/ o.0
This comment was minimized by the moderator on the site
I tried the above method but nothing happens. I verified the folder name was accurate and in the right location. I also set my main account as default, where i will be moving read messages from. I click on the Macro button...nothing. Help. Did I miss something.
This comment was minimized by the moderator on the site
You have to activate the references in VBA
This comment was minimized by the moderator on the site
Can this VBA code be altered to move messages from an Inbox subfolder to a "Reviewed" folder in said subfolder?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations