So erstellen Sie eine Aufgabe automatisch, wenn einer bestimmten Kategorie in Outlook eine bestimmte Kategorie zugewiesen wird

Jetzt teilen:

In diesem Artikel erfahren Sie, wie Sie automatisch eine neue Aufgabe erstellen, wenn Sie einer E-Mail mithilfe von Outlook VBA eine bestimmte Farbkategorie zuweisen.

In der Vergangenheit habe ich, als ich eine E-Mail mit einer Aufgabe erhalten habe, die Kategorie "Aufgabe" für diese E-Mail angegeben und eine neue verwandte Aufgabe erstellt. Um ehrlich zu sein, ist dieser Prozess in der Tat zeitaufwändig. Ich muss alle Informationen im Voraus aufschreiben, da diese Angaben in der neuen Aufgabe verlangt werden müssen. Mit Hilfe von VBA kann Outlook jetzt automatisch eine neue Aufgabe erstellen, wenn ich einer E-Mail die Kategorie "Aufgabe" gebe. Wenn Sie an diesem Tipp interessiert sind, lesen Sie weiter, um sie im Detail zu erhalten.

Automatische Erstellung einer Aufgabe, wenn einer E-Mail eine bestimmte Kategorie zugewiesen wird

  1. Starten Sie zunächst Outlook und wechseln Sie zur Registerkarte „Entwickler“.
  2. Auf dieser Registerkarte können Sie die Schaltfläche „Visual Basic“ suchen und darauf klicken.
  3. Dann öffnet sich ein neues Fenster von "Microsoft Visual Basic für Applikationen". Darin sollten Sie auf das Projekt „ThisOutlookSession“ doppelklicken.
  4. Als nächstes sollten Sie die folgenden VBA-Codes in das Projektfenster „ThisOutlookSession“ kopieren.
Public WithEvents OlItems As Outlook.Items

Sub Application_Startup()
    Set OlItems = Session.GetDefaultFolder(olFolderInbox).Items
End Sub

Sub OlItems_ItemChange(ByVal Item As Object)
    Dim obApp As Application
    Dim olTask As TaskItem

    If Item.Class = olMail And Item.Categories = "Task" Then
       Set obApp = Outlook.Application
       Set olTask = obApp.CreateItem(olTaskItem)
       With olTask
            .Subject = Item.Subject
            .Body = Item.Body
            .Attachments.Add Item
            .StartDate = Now
            .DueDate = Now + 3
            .Save
            .Display
       End With
    End If
 
    'To clear the category
    'If you want to keep the category, remove the following four lines
    With Item
         .Categories = ""
         .Save
    End With
 
    Set obApp = Nothing
    Set olTask = Nothing
End Sub

Kopieren Sie die Codes und fügen Sie sie in ThisOutlookSession ein

  1. Danach müssten Sie diesen Code unterschreiben. Sie können das in Office integrierte Dienstprogramm "Digitales Zertifikat für VBA-Projekte" verwenden, um dies zu erreichen. Ausführlichere Schritte finden Sie in Schritt 2 in diesem Artikel.2 Schritte zum automatischen Markieren von Junk-E-Mails als in Outlook gelesen".Digitale Zertifikate für VBA-Projekte
  2. Um ein externes bösartiges Makro zu verhindern, sollten Sie sich später an "Trust Center" wenden und die Makroeinstellungen ändern, um nur digital signierte Makros zu aktivieren.Ändern Sie die Makroeinstellungen
  3. Schließlich können Sie es versuchen.
  • Stellen Sie eine E-Mail-Nachricht auf und weisen Sie ihr eine bestimmte Kategorie zu, wie im folgenden Screenshot dargestellt:Weisen Sie der E-Mail die bestimmte Kategorie zu
  • Sofort wird automatisch eine neue Aufgabe erstellt und in einem neuen Popup-Fenster angezeigt.Neue Aufgabe

Behalten Sie schädliche Makros in verdächtigen E-Mails im Auge

Es ist äußerst wichtig, alle externen nicht signierten Makros zu blockieren, da sie Viren oder Malware enthalten können, die Ihre Outlook-Daten leicht beschädigen können. Benutzer sollten daher genau auf die E-Mails achten, die mit Makros geliefert werden. Darüber hinaus ist es sehr ratsam, in eine bemerkenswerte zu investieren beschädigtes Outlook-Datenkorrektur-Tool– wie DataNumen Outlook Repair. Es kann Ihnen helfen, wenn Sie einen unerwarteten Outlook-Absturz erleiden.

Einführung des Autors:

Shirley Zhang ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich SQL-MDF-Fehler reparieren und Outlook-Reparatursoftwareprodukte. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX

Jetzt teilen:

Kommentare sind geschlossen.