Como definir automaticamente a sensibilidade de um e-mail com base em seus destinatários no Outlook

O Outlook permite que os usuários marquem e-mail como normal, privado, pessoal ou confidencial à vontade. Alguns usuários gostariam de definir automaticamente a sensibilidade de um e-mail com base em seus destinatários. Portanto, neste artigo, compartilharemos um método para realizá-lo.

Ao definir a sensibilidade do e-mail, você está realmente sugerindo aos destinatários como lidar com o conteúdo do e-mail. Por exemplo, marcando o e-mail como “Confidencial”, os destinatários receberão uma mensagem na barra de informações – “Por favor, trate isso como confidencial”. Portanto, muitos usuários gostam desse recurso. No entanto, como eles frequentemente se esquecem de definir a sensibilidade do e-mail, eles esperam que o Outlook possa fazer isso automaticamente com base nos destinatários. Assim, aqui vamos apresentar uma abordagem para alcançá-lo.

Definir automaticamente a sensibilidade de um e-mail com base em seus destinatários

1. Para começar, abra o programa Outlook.
2. Então, depois de chegar à janela principal do Outlook, você precisa pressionar os botões de tecla “Alt + F11”.
3. Em seguida, você entrará no editor VBA. Na nova janela, você deve acessar o projeto “ThisOutlookSession”.
4. Posteriormente, copie e cole o seguinte código VBA neste projeto.

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. Depois de colar o código, você deve alterar manualmente os destinatários predefinidos de acordo com o seu caso.
6. Então, você deve assinar este código. Clique em “Ferramentas” > “Assinatura Digital” e siga as instruções na tela na nova caixa de diálogo para realizá-lo.
7. Em seguida, você pode fechar a janela atual.
8. Mais tarde, vá para “Configurações de macro” para habilitar macros assinadas digitalmente.
9. Eventualmente, você pode dar um tiro. Basta redigir e enviar um e-mail para o destinatário específico. Após o envio do e-mail, você pode acessar a pasta “Itens Enviados” para conferi-lo. Sua sensibilidade será definida com base na macro, como na captura de tela a seguir:

Utilize uma ferramenta de recuperação útil

O Outlook vem com uma ferramenta de reparo embutida – Scanpst.exe. No entanto, em caso de problemas sérios, esta ferramenta não será de grande ajuda. Assim, sugerimos sempre preparar outro poderoso e confiável Reparo do Outlook utilitário, como DataNumen Outlook Repair. Com ele, você poderá resgatar seu arquivo corrompido do Outlook mesmo se a ferramenta interna falhar. Além disso, foi comprovado com alta taxa de recuperação de PST.

Introdução do autor:

Shirley Zhang é especialista em recuperação de dados em DataNumen, Inc., líder mundial em tecnologias de recuperação de dados, incluindo conserto de mdf e produtos de software de reparo do Outlook. Para mais informações visite www.datanumen.com