Sådan opretter du automatisk en opgave, når en specifik kategori er tildelt en e-mail i Outlook

Outlook-løsninger September 29, 2025

Denne artikel vil lære dig, hvordan du automatisk opretter en ny opgave, når du tildeler en bestemt farvekategori til en e-mail ved hjælp af Outlook VBA.

Tidligere, da jeg modtog en e-mail involveret i en opgave, plejede jeg at angive kategorien "Opgave" til denne e-mail og fortsætte med at oprette en ny relateret opgave. For at være ærlig er denne proces faktisk tidskrævende. Jeg er nødt til at skrive al info ned på forhånd, da disse detaljer skal kræves i den nye opgave. Men nu, ved hjælp af VBA, kan Outlook automatisk oprette en ny opgave, hver gang jeg angiver kategorien "Opgave" til en e-mail. Hvis du er interesseret i dette tip, så læs videre for at få dem i detaljer.

Opret automatisk en opgave, når en specifik kategori er tildelt en e-mail

  1. Til at starte med skal du åbne Outlook og skifte til fanen "Udvikler".
  2. På denne fane kan du finde og klikke på knappen "Visual Basic".
  3. Derefter åbnes et nyt vindue med "Microsoft Visual Basic for Applications". I den skal du dobbeltklikke på "ThisOutlookSession" -projektet.
  4. Dernæst skal du kopiere følgende VBA-koder til projektvinduet "ThisOutlookSession".
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

Kopiér og indsæt koderne i ThisOutlookSession

  1. Derefter skal du underskrive denne kode. Du kan bruge det indbyggede Office-værktøj - "Digitalt certifikat for VBA-projekter" for at opnå det. For mere detaljerede trin, kan du henvise til trin 2 i denne artikel "2 trin til automatisk mærkning af uønskede e-mails som læst i Outlook".Digitale certifikater til VBA-projekter
  2. Senere for at forhindre ekstern ondsindet makro, bør du gå til "Trust Center" og ændre makroindstillingerne for kun at aktivere digitalt signerede makroer.Skift makroindstillinger
  3. Til sidst kan du prøve.
  • Pitch på en postforsendelse og tildel en bestemt kategori til den, som følgende skærmbillede:Tildel den specifikke kategori til e-mailen
  • På én gang oprettes en ny opgave automatisk og vises i et nyt popup-vindue.Ny opgave

Hold øje med ondsindede makroer i mistænkte e-mails

Det er meget vigtigt at blokere alle de eksterne u-signerede makroer, da de kan indeholde vira eller malware, som nemt kan beskadige dine Outlook-data. Så brugere bør være meget opmærksomme på de e-mails, der følger med makroer. Derudover er det stærkt tilrådeligt at investere i en bemærkelsesværdig korrupte Outlook data fix værktøjSom DataNumen Outlook Repair. Det kan komme dig til undsætning, når du oplever et uventet Outlook-nedbrud.

Forfatter Introduktion:

Shirley Zhang er ekspert i datagendannelse i DataNumen, Inc., som er verdens førende inden for datagendannelsesteknologier, herunder reparation SQL mdf fejl og Outlook-reparationssoftwareprodukter. For mere information besøg www.datanumen.com

Kommentarer er lukket.