Az e-mailek érzékenységének automatikus beállítása a címzettek alapján az Outlook programban

Az Outlook lehetővé teszi a felhasználók számára, hogy tetszés szerint megjelöljék az e-maileket normálként, privátként, személyesként vagy bizalmasként. Egyes felhasználók szeretnék automatikusan beállítani az e-mailek érzékenységét a címzettek alapján. Tehát ebben a cikkben megosztunk egy módszert ennek megvalósítására.

Az e-mailek érzékenységének beállításával valójában azt javasolja a címzetteknek, hogyan kezeljék az e-mail tartalmát. Például, ha az e-mailt „Bizalmas”-ként jelöli meg, a címzettek egy üzenetet kapnak az Infosávban – „Kérjük, kezelje bizalmasként”. Tehát sok felhasználónak nagyon tetszik ez a funkció. Mégis, mivel gyakran elfelejtik beállítani az e-mail érzékenységét, remélik, hogy az Outlook ezt automatikusan meg tudja tenni a címzettek alapján. Ezért itt bemutatunk egy megközelítést ennek eléréséhez.

Az e-mail érzékenységének automatikus beállítása a címzettek alapján

1. Kezdésként indítsa el az Outlook programot.
2. Ezután, miután eljutott az Outlook főablakába, meg kell nyomnia az „Alt + F11” billentyűket.
3. Ezután belép a VBA-szerkesztőbe. Az új ablakban el kell érnie a „ThisOutlookSession” projektet.
4. Ezt követően másolja ki és illessze be a következő VBA-kódot ebbe a projektbe.

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim objMail As Outlook.MailItem
    Dim objRecipients As Outlook.Recipients
    Dim objRecipient As Outlook.recipient
 
    If TypeOf Item Is MailItem Then
       Set objMail = Item
       Set objRecipients = objMail.Recipients
 
       If objRecipients.count = 1 Then
          Set objRecipient = objRecipients.Item(1)
 
          'Change the recipient as per your needs
          Select Case objRecipient.Address
                 Case "kim@datanumen.com", "abby@datanumen.com"
                      objMail.Sensitivity = olPersonal
                 Case "coral@datanumen.com", "amy@datanumen.com", "shelly@datanumen.com"
                      objMail.Sensitivity = olPrivate
                 Case "boss@datanumen.com"
                      objMail.Sensitivity = olConfidential
                 Case Else
                      objMail.Sensitivity = olNormal
          End Select
          objMail.Save
       End If
    End If
End Sub

5. A kód beillesztése után manuálisan kell módosítania az előre meghatározott címzetteket saját esetének megfelelően.
6. Ezután alá kell írnia ezt a kódot. Kattintson az „Eszközök” > „Digitális aláírás” elemre, és kövesse a képernyőn megjelenő utasításokat az új párbeszédpanelen.
7. Ezután bezárhatja az aktuális ablakot.
8. Később lépjen a „Makróbeállítások” részre a digitálisan aláírt makrók engedélyezéséhez.
9. Végül lőhet egy lövést. Csak írjon és küldjön egy levelet az adott címzettnek. Az e-mail elküldése után az „Elküldött tételek” mappába lépve ellenőrizheti azt. Az érzékenysége a makró alapján lesz beállítva, például a következő képernyőképen:

Használjon hasznos helyreállító eszközt

Az Outlookhoz tartozik egy beépített javítóeszköz – a Scanpst.exe. Komoly problémák esetén azonban ez az eszköz nem sokat segít. Ezért mindig javasoljuk, hogy készítsen egy másik erős és megbízható Outlook javítás segédprogram, mint pl DataNumen Outlook Repair. Ezzel akkor is megmentheti a sérült Outlook-fájlt, ha a belső eszköz meghibásodik. Ezenkívül bebizonyosodott, hogy magas a PST helyreállítási aránya.

Szerző Bevezetés:

Shirley Zhang adat-helyreállítási szakértő DataNumen, Inc., amely világelső az adat-helyreállítási technológiák területén, beleértve mdf javítás és outlook javítószoftver termékek. További információért látogasson el www.datanumen.com