Kuidas uusi sissetulevaid e-kirju automaatselt kategoriseerida saatjate kontaktide kategooriate alusel

Mõned Outlooki kasutajad eelistavad oma e-kirju kategoriseerida vastavalt saatjate kontaktide värvikategooriatele. Kategooria käsitsi määramine peab olema tülikas. See artikkel tutvustab, kuidas seda Outlook VBA abil automaatselt realiseerida.

Outlookis töö tõhususe parandamiseks teete jõupingutusi oma e-kirjade paremaks haldamiseks. Kahtlemata on "Värvikategooriad" selles osas hea omadus. Paljud kasutajad eelistavad seda kasutada oma kirjade korraldamiseks ja eristamiseks. Muidugi sõltub meilide värvide kategoriseerimise konkreetne alus teie isiklikest harjumustest. Näiteks on mõned kasutajad oma kontaktid värviga kategoriseerinud, mistõttu nad loodavad oma e-kirjad kategoriseerida vastavalt saatjate kontaktide kategooriatele. Kui teete seda käsitsi, on see kindlasti segane, kuna peate esmalt kontrollima saatja kontaktide kategooriaid ja seejärel käsitsi määrama selle meilile.

Selle nõude täitmiseks saate tegelikult kasutada Outlook VBA-d, mis võimaldab Outlookil automaatselt kontrollida saatja kontaktide kategooriaid ja määrata need uutele meilidele. Kui olete sellest funktsioonist huvitatud, lugege üksikasjalikke samme ja koode.

Sissetulevate meilide automaatne kategoriseerimine saatjate kontaktide kategooriate järgi

1. Kõigepealt käivitage Outlook ja vajutage klahvikombinatsiooni Alt + F11.
2. Seejärel kuvatakse VBA redaktori aken, kus peate leidma ja avama projekti „ThisOutlookSession”.
3. Järgmisena kopeerige ja kleepige järgmised VBA-koodid jaotisesse ThisOutlookSession.

Public WithEvents olItems As Outlook.Items

Private Sub Application_Startup()
    Set olItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub

Private Sub olItems_ItemAdd(ByVal Item As Object)
    Dim oMail As MailItem
    Dim olContacts As Outlook.Items
    Dim obj As Object
    Dim objVariant As Variant
    Dim olCategory As String
 
    Set olContacts = Outlook.Application.Session.GetDefaultFolder(olFolderContacts).Items
  
    If TypeOf Item Is MailItem Then
       Set oMail = Item
       For Each obj In olContacts
           If TypeOf obj Is ContactItem Then
              Set objVariant = obj
              If objVariant.Email1Address = oMail.SenderEmailAddress Then
                 olCategory = objVariant.Categories
                 oMail.Categories = olCategory
              End If
           End If
       Next
    End If
End Sub

4. Seejärel peaksite uuele makrole määrama digitaalse sertifikaadi.

• Esiteks looge VBA projektide jaoks digitaalsete sertifikaatide kaudu uus sertifikaat.
• Seejärel allkirjastage see kood digitaalselt.

5. Pärast seda saate muuta oma Outlooki makro turvalisust, lubades ainult digitaalselt allkirjastatud makrosid.
6. Lõpuks saate restart Outlook uue makro aktiveerimiseks. Nüüdsest kategoriseeritakse kõik sissetulevad kirjad, mis saabuvad kausta Inbox, automaatselt saatjate kontaktikategooriate järgi.

Lahendage ootamatu Outlooki krahh

Kuigi paljud kasutajad eelistavad Outlooki, ei saa see siiski krahhist lahti. Peate tundma paanikat, kui kannatate Outlooki ootamatu krahhi all. Ära muretse. Saate ise probleeme diagnoosida ja lahendada, nt restarOutlooki väljalülitamine, kolmanda osapoole lisandmoodulite keelamine, uue meiliprofiili loomine ja Office'i komplekti parandamine ja nii edasi. Halvimal juhul peab olema rikutud Outlooki PST-andmed, mis on äärmiselt sõlmeline. Selle stsenaariumi korral peate kasutama tugevat välist tööriista, näiteks DataNumen Outlook Repair.

Autori sissejuhatus:

Shirley Zhang on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas rikutud SQL mdf db parandamine ja Outlooki remonditarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom