Imprima facilmente um e-mail enviado com destinatários Cco no Outlook

Siga as etapas abaixo para aplicar o VBA para imprimir o e-mail selecionado, ignorando seus destinatários no Outlook.

1. Selecione o e-mail que você imprimirá sem destinatários e pressione o botão outro + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Clique inserção > Móduloe, a seguir, cole o código VBA abaixo na janela de abertura do Módulo.

VBA: imprimir um e-mail sem destinatários

Public Sub PrintWithoutRecipient()
Dim oItem As Outlook.MailItem
Dim i As Long

For i = 1 To Application.ActiveExplorer.Selection.Count
Set oItem = Application.ActiveExplorer.Selection.Item(i)
oItem.To = ""
oItem.CC = ""
oItem.PrintOut
oItem.Close olDiscard
Set oItem = Nothing
Next
End Sub

3. aperte o F5 ou clique no Execute botão para executar este VBA.

Agora o e-mail selecionado é impresso sem seus destinatários.

Nota: Este VBA imprimirá o e-mail com a impressora padrão e as configurações de impressão definidas no Outlook.

Pesquise e-mails por nomes de destinatários no Outlook

Conte o número de destinatários nos campos Para, Cc e Bcc no Outlook

Imprimir destinatários Cco em um e-mail enviado no Outlook