Hoe u automatisch een taak kunt maken wanneer een specifieke categorie is toegewezen aan een e-mail in Outlook

In dit artikel leer je hoe je automatisch een nieuwe taak aanmaakt wanneer je een specifieke kleurcategorie toewijst aan een e-mail door middel van Outlook VBA.

Als ik in het verleden een e-mail ontving die betrekking had op een taak, specificeerde ik de categorie "Taak" voor deze e-mail en ging ik verder met het maken van een nieuwe gerelateerde taak. Om eerlijk te zijn, dit proces is inderdaad tijdrovend. Ik moet alle info van tevoren opschrijven, aangezien deze details in de nieuwe taak moeten worden geëist. Maar nu, met behulp van VBA, kan Outlook automatisch een nieuwe taak maken wanneer ik de categorie "Taak" specificeer voor een e-mail. Als je geïnteresseerd bent in deze tip, lees dan verder om ze in detail te bekijken.

Maak automatisch een taak wanneer een specifieke categorie aan een e-mail is toegewezen

  1. Om te beginnen, open Outlook en ga naar het tabblad 'Ontwikkelaar'.
  2. Op dit tabblad kunt u de knop "Visual Basic" vinden en erop klikken.
  3. Vervolgens wordt een nieuw venster van "Microsoft Visual Basic for Applications" geopend. Daarin moet u dubbelklikken op het project "ThisOutlookSession".
  4. Vervolgens moet u de volgende VBA-codes kopiëren naar het projectvenster "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

Kopieer en plak de codes in ThisOutlookSession

  1. Daarna moet u deze code ondertekenen. U kunt het ingebouwde hulpprogramma van Office – “Digitaal certificaat voor VBA-projecten” gebruiken om dit te bereiken. Voor meer gedetailleerde stappen kunt u stap 2 in dit artikel raadplegen “2 stappen om ongewenste e-mails automatisch te markeren als gelezen in Outlook'.Digitale certificaten voor VBA-projecten
  2. Om externe kwaadaardige macro's te voorkomen, moet u later naar "Vertrouwenscentrum" gaan en de macro-instellingen wijzigen om alleen digitaal ondertekende macro's in te schakelen.Wijzig macro-instellingen
  3. Uiteindelijk kun je het proberen.
  • Pitch op een e-mailitem en wijs er een specifieke categorie aan toe, zoals de volgende schermafbeelding:Wijs de specifieke categorie toe aan de e-mail
  • Er wordt meteen automatisch een nieuwe taak gemaakt en deze wordt weergegeven in een nieuw pop-upvenster.Nieuwe taak

Houd kwaadaardige macro's in verdachte e-mails in de gaten

Het is van vitaal belang om alle externe niet-ondertekende macro's te blokkeren, omdat ze virussen of malware kunnen bevatten, die uw Outlook-gegevens gemakkelijk kunnen beschadigen. Gebruikers moeten dus goed letten op de e-mails die met macro's worden geleverd. Daarnaast is het zeer aan te raden om te investeren in een opmerkelijke corrupte tool voor het herstellen van Outlook-gegevens, zoals DataNumen Outlook Repair. Het kan u te hulp komen wanneer u een onverwachte crash van Outlook ondervindt.

Auteur Introductie:

Shirley Zhang is een expert op het gebied van gegevensherstel in DataNumen, Inc., de wereldleider in technologieën voor gegevensherstel, waaronder herstel SQL mdf-fout en Outlook-reparatiesoftwareproducten. Voor meer informatie bezoek www.datanumen.com

Reacties zijn gesloten.