Wie kann ich Anhänge nur anhand bestimmter Kriterien in Outlook automatisch weiterleiten?
Normalerweise werden beim Weiterleiten einer E-Mail auch der ursprüngliche Nachrichtentext und die Anhänge berücksichtigt. Manchmal müssen Sie jedoch nur Anhänge ohne die ursprüngliche Nachricht basierend auf Kriterien an eine bestimmte Person weiterleiten. Wie können Sie diesen Job in Outlook lösen?
Leiten Sie nur Anhänge, die auf bestimmten Kriterien basieren, automatisch mit VBA-Code an eine Person weiter
Wenn Sie beispielsweise eine E-Mail erhalten, deren Betreff den Text "kto feature" enthält, werden alle Anhänge dieser E-Mail automatisch ohne Nachrichtentext an die jeweilige Person weitergeleitet. Die folgenden Schritte können Ihnen dabei helfen: Bitte gehen Sie folgendermaßen vor:
1. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
2. In dem Microsoft Visual Basic für Applikationen Fenster, Doppelklick DieseOutlookSession von dem Projekt1 (VbaProject.OTM) Bereich, um den Modus zu öffnen, und kopieren Sie dann den folgenden Code und fügen Sie ihn in das leere Modul ein.
VBA-Code: E-Mail ohne Nachrichtentext automatisch weiterleiten, aber nur die Anhänge einschließen:
Public WithEvents ReceivedItems As Outlook.Items
Private Sub Application_Startup()
Set ReceivedItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub ReceivedItems_ItemAdd(ByVal Item As Object)
Dim xForwardMail As Outlook.MailItem
Dim xEmail As MailItem
On Error Resume Next
If Item.Class <> olMail Then Exit Sub
Set xEmail = Item
If InStrRev(UCase(xEmail.Subject), UCase("kto feature")) = 0 Then Exit Sub 'change subject text to your need
If xEmail.Attachments.Count = 0 Then Exit Sub
Set xForwardMail = xEmail.Forward
With xForwardMail
.HTMLBody = ""
With .Recipients
.Add "skyyang@addin88.com" 'change address to your own
.ResolveAll
End With
.Send
End With
End Sub
Note: Im obigen Code sollten Sie den Betreff und die Empfängeradresse in Ihre eigene ändern.
3. Speichern Sie dann den Code und starten Sie Outlook neu, um den Codeeffekt zu erzielen.
4. Von nun an leitet Outlook jedes Mal, wenn eine neue E-Mail mit dem spezifischen Betreff in Ihrem Postfach eingeht, die Anhänge ohne Nachrichtentext automatisch an die gewünschte Person weiter.
Note: Dieser Code ist nur für das Standardkonto verfügbar.
Beste Office-Produktivitätstools
Eilmeldung: Einführung von Kutools für Outlook Kostenlos Version!
Erleben Sie die brandneuen Kutools für Outlook KOSTENLOSE Version mit über 70 unglaublichen Funktionen, die Sie FÜR IMMER nutzen können! Klicken Sie hier, um jetzt herunterzuladen!
📧 E-Mail Automation: Automatische Antwort (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 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 / Erinnern Sie sich an wichtige E-Mails / 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 ...
