Kako automatski postaviti osjetljivost e-pošte na osnovu primatelja u vašem Outlooku

Outlook omogućava korisnicima da po volji označe e-poštu kao normalnu, privatnu, ličnu ili povjerljivu. Neki korisnici bi željeli automatski postaviti osjetljivost e-pošte na osnovu primatelja. Dakle, u ovom članku ćemo podijeliti metodu kako to realizirati.

Postavljanjem osjetljivosti e-pošte, zapravo sugerišete primaocima kako da postupaju sa sadržajem e-pošte. Na primjer, ako e-poštu označite kao „Povjerljivo“, primaoci će dobiti upit u InfoBar-u – „Molim vas, tretirajte ovo kao povjerljivo“. Dakle, mnogim korisnicima se ova funkcija prilično sviđa. Ipak, pošto često zaborave da podese osetljivost e-pošte, nadaju se da Outlook to može automatski da uradi na osnovu primalaca. Stoga ćemo ovdje uvesti pristup kako bismo to postigli.

Automatsko postavljanje osjetljivosti e-pošte na osnovu primatelja

1. Za početak, pokrenite Outlook program.
2. Zatim, nakon što dođete do glavnog prozora programa Outlook, trebate pritisnuti tipke “Alt + F11”.
3. Zatim ćete ući u VBA editor. U novom prozoru, trebali biste pristupiti projektu “ThisOutlookSession”.
4. Nakon toga, kopirajte i zalijepite sljedeći VBA kod u ovaj projekat.

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. Nakon što zalijepite kod, morate ručno promijeniti unaprijed definirane primaoce prema vlastitom slučaju.
6. Zatim, treba da potpišete ovaj kod. Kliknite na “Alati” > “Digitalni potpis” i slijedite upute na ekranu u novom dijaloškom okviru da biste to postigli.
7. Zatim, možete zatvoriti trenutni prozor.
8. Kasnije idite na “Postavke makroa” da omogućite digitalno potpisane makroe.
9. Na kraju, možete pucati. Samo sastavite i pošaljite e-poštu određenom primaocu. Nakon slanja e-pošte, možete otići u folder „Poslane stavke“ da biste je provjerili. Njegova osjetljivost će biti postavljena na osnovu makroa, kao na sljedećem snimku ekrana:

Koristite korisni alat za oporavak

Outlook dolazi zajedno sa ugrađenim alatom za popravku – Scanpst.exe. Međutim, u slučaju ozbiljnih problema, ovaj alat neće biti od velike pomoći. Stoga uvijek predlažemo pripremu još jednog moćnog i pouzdanog Outlook popravak korisnost, kao npr DataNumen Outlook Repair. Pomoću njega ćete moći spasiti svoju oštećenu Outlook datoteku čak i ako interni alat ne uspije. Takođe, dokazano je sa visokom stopom oporavka PST-a.

Uvod za autora:

Shirley Zhang je stručnjak za oporavak podataka DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući mdf fix i Outlook softverski proizvodi za popravku. Za više informacija posjetite www.datanumen.com