Wie kann ich Besprechungen automatisch eine Farbkategorie zuweisen, nachdem sie in Outlook akzeptiert wurden?
Bei Ihrer täglichen Arbeit erhalten Sie möglicherweise mehrere Besprechungs-E-Mails in Outlook. Manchmal möchten Sie Besprechungen automatisch eine bestimmte Farbkategorie zuweisen, wenn sie akzeptiert werden. Normalerweise können Sie sie manuell zuweisen. Es ist jedoch schwierig, sie einzeln festzulegen. In diesem Artikel werde ich darüber sprechen, wie dies in Outlook automatisch durchgeführt wird.
Weisen Sie Besprechungen automatisch eine Farbkategorie zu, nachdem Sie sie mit VBA-Code akzeptiert haben
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: Ordnen Sie Besprechungen nach dem Akzeptieren automatisch eine Farbkategorie zu
Public WithEvents SentItems As Outlook.Items
Private Sub Application_Startup()
Set SentItems = Outlook.Application.Session.GetDefaultFolder(olFolderSentMail).Items
End Sub
Private Sub SentItems_ItemAdd(ByVal Item As Object)
Dim xMeetingItem As Outlook.MeetingItem
Dim xMeetingItemAccepted As Outlook.MeetingItem
Dim xAppointmentItem As Outlook.AppointmentItem
On Error Resume Next
If TypeOf Item Is MeetingItem Then
Set xMeetingItem = Item
If InStr(xMeetingItem.Subject, "Accepted:") = 1 Then
Set xMeetingItemAccepted = xMeetingItem
Set xAppointmentItem = xMeetingItemAccepted.GetAssociatedAppointment(True)
With xAppointmentItem
.Categories = .Categories & "Red Category"
.Save
End With
End If
End If
End Sub
Note: Im obigen Code können Sie ändern Rote Kategorie zu Ihrem gewünschten Farbkategorienamen.
3. Starten Sie anschließend Outlook neu, um dieses Makro auszulösen.
4. Nachdem Sie die Besprechungs-E-Mail akzeptiert haben, klicken Sie auf Senden Sie die Antwort jetzt Option, wird die spezifische Farbkategorie sofort dem akzeptierten Meeting zugewiesen. Siehe Screenshot:
Note: Dieser Code wird nur auf das Standarddatenkonto angewendet.
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.