Kako samodejno ustvariti nalogo, kadar je določena kategorija dodeljena e-pošti v Outlooku

Ta članek vas bo naučil, kako samodejno ustvarite novo nalogo, ko e-poštnemu sporočilu dodelite določeno barvno kategorijo s pomočjo Outlook VBA.

V preteklosti, ko sem prejel e-poštno sporočilo z nalogo, sem temu e-poštnemu sporočilu določil kategorijo »Opravilo« in nadaljeval z ustvarjanjem nove povezane naloge. Če sem iskren, je ta postopek res dolgotrajen. Vse podatke si moram zapisati vnaprej, saj morajo biti te podrobnosti zahtevane v novi nalogi. Zdaj pa lahko Outlook s pomočjo VBA samodejno ustvari novo opravilo, kadar koli v e-poštnem sporočilu določim kategorijo »Opravilo«. Če vas ta nasvet zanima, preberite, če želite izvedeti več o njih.

Samodejno ustvari opravilo, kadar je e-poštnemu sporočilu dodeljena določena kategorija

1. Za začetek zaženite Outlook in preklopite na zavihek »Razvijalec«.
2. Na tem zavihku lahko najdete in kliknete gumb »Visual Basic«.
3. Nato se odpre novo okno »Microsoft Visual Basic for Applications«. V njem bi morali dvakrat klikniti projekt »ThisOutlookSession«.
4. Nato kopirajte naslednje kode VBA v okno projekta »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

5. Po tem bi morali podpisati to kodo. Za dosego tega lahko uporabite Officeov vgrajeni pripomoček – »Digitalno potrdilo za projekte VBA«. Za podrobnejše korake se lahko obrnete na 2. korak v tem članku "2 koraka za samodejno označevanje neželene e-pošte kot prebrane v Outlooku".
6. Kasneje, da preprečite zunanje zlonamerne makre, se obrnite na »Center zaupanja« in spremenite nastavitve makra, da omogočite samo digitalno podpisane makre.
7. Sčasoma lahko poskusite.

• Predstavite poštni element in mu dodelite določeno kategorijo, kot je ta posnetek zaslona:
• Takoj bo samodejno ustvarjeno novo opravilo in prikazano v novem pojavnem oknu.

Spremljajte zlonamerne makre v domnevnih e-poštnih sporočilih

Zelo pomembno je, da blokirate vse zunanje nepodpisane makre, saj lahko vsebujejo viruse ali zlonamerno programsko opremo, ki lahko zlahka poškoduje vaše Outlookove podatke. Zato bi morali biti uporabniki zelo pozorni na e-poštna sporočila, ki so priložena makrom. Poleg tega je zelo priporočljivo vlagati v izjemno poškodovano orodje za popravljanje podatkov Outlookkot DataNumen Outlook Repair. Lahko vam priskoči na pomoč, ko doživite nepričakovano zrušitev Outlooka.

Uvod avtorja:

Shirley Zhang je strokovnjakinja za obnovitev podatkov v DataNumen, Inc., ki je vodilna na svetu na področju tehnologij za obnovitev podatkov, vključno z popravi napako SQL mdf in obeti za popravilo programskih izdelkov. Za več informacij obiščite www.datanumen.com