Bir E-postanın Hassasiyetini Outlook'unuzdaki Alıcılarına Göre Otomatik Olarak Ayarlama

Outlook, kullanıcıların e-postayı istedikleri zaman normal, özel, kişisel veya gizli olarak işaretlemelerine olanak tanır. Bazı kullanıcılar, bir e-postanın hassasiyetini alıcılarına göre otomatik olarak ayarlamak ister. O yüzden bu yazımızda bunu gerçekleştirmek için bir yöntem paylaşacağız.

E-postanın hassasiyetini ayarlayarak, aslında alıcılara e-posta içeriğiyle nasıl başa çıkacaklarını öneriyorsunuz. Örneğin, e-postayı "Gizli" olarak işaretlerseniz, alıcılar Bilgi Çubuğunda "Lütfen bunu Gizli olarak kabul edin" şeklinde bir uyarı alır. Yani, birçok kullanıcı bu özelliği oldukça beğeniyor. Yine de e-postanın hassasiyetini ayarlamayı sık sık unuttuklarından, Outlook'un bunu alıcılara göre otomatik olarak yapabileceğini umuyorlar. Böylece, burada bunu başarmak için bir yaklaşım tanıtacağız.

Bir E-postanın Hassasiyetini Alıcılarına Göre Otomatik Olarak Ayarlayın

1. Öncelikle Outlook programınızı başlatın.
2. Ardından, ana Outlook penceresine geldikten sonra “Alt + F11” tuş düğmelerine basmanız gerekir.
3. Ardından, VBA düzenleyicisine gireceksiniz. Yeni pencerede, “ThisOutlookSession” projesine erişmelisiniz.
4. Ardından, aşağıdaki VBA kodunu kopyalayıp bu projeye yapıştırın.

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. Kodu yapıştırdıktan sonra, önceden tanımlanmış alıcıları kendi durumunuza göre manuel olarak değiştirmeniz gerekir.
6. Ardından, bu kodu imzalamanız gerekir. Bunu gerçekleştirmek için “Araçlar” > “Dijital İmza”ya tıklayın ve yeni iletişim kutusunda ekrandaki talimatları izleyin.
7. Ardından, mevcut pencereyi kapatabilirsiniz.
8. Daha sonra dijital olarak imzalanmış makroları etkinleştirmek için "Makro ayarları"na gidin.
9. Sonunda, bir atış yapabilirsiniz. Belirli bir alıcıya bir posta oluşturun ve gönderin. E-posta gönderildikten sonra, kontrol etmek için "Gönderilmiş Öğeler" klasörüne gidebilirsiniz. Hassasiyeti, aşağıdaki ekran görüntüsü gibi makroya göre ayarlanacaktır:

Faydalı Bir Kurtarma Aracı Kullanın

Outlook, yerleşik bir onarım aracı olan Scanpst.exe ile birlikte gelir. Ancak, ciddi sorunlar olması durumunda bu araç pek yardımcı olmayacaktır. Bu nedenle, her zaman güçlü ve güvenilir başka bir tane hazırlamanızı öneririz. Outlook onarımı gibi yardımcı program DataNumen Outlook Repair. Bununla, dahili araç başarısız olsa bile bozuk Outlook dosyanızı kurtarabileceksiniz. Ayrıca, yüksek PST iyileşme oranı ile kanıtlanmıştır.

Yazar Tanıtımı:

Shirley Zhang, bir veri kurtarma uzmanıdır. DataNumendahil olmak üzere veri kurtarma teknolojilerinde dünya lideri olan , Inc. mdf düzeltme ve görünüm onarım yazılım ürünleri. Daha fazla bilgi için ziyaret edin www.datanumen.com