Como evitar o envio de anexos para destinatários CC e BCC ao redigir e-mail no Outlook?
Como todos sabemos, todos os destinatários nos campos “Para”, “CC” ou “BCC”, obterão os anexos ao enviar e-mails com anexos. No entanto, alguns usuários desejam enviar os anexos apenas para os destinatários “Para”, com os destinatários “CC” e “CCO” recebendo apenas a mensagem sem os anexos. Como você resolveria esse trabalho no Outlook?
Impedir o envio de anexos para destinatários CC e BCC ao redigir e-mail com código VBA
Impedir o envio de anexos para destinatários CC e BCC ao redigir e-mail com código VBA
Na verdade, o Outlook não oferece uma opção para lidar com essa tarefa, mas o seguinte código VBA pode fazer um favor a você, faça o seguinte:
1. Segure o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.
2. No Microsoft Visual Basic para Aplicações janela, clique duplo Esta sessão do Outlook do Projeto1 (VbaProject.OTM) painel para abrir o modo e, em seguida, copie e cole o código a seguir no módulo em branco.
Código VBA: impede o envio de anexos para destinatários CC e BCC:
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim xMailItem As Outlook.MailItem
Dim xNewMail As Outlook.MailItem
If Item.Class <> olMail Then Exit Sub
Set xMailItem = Item
Set xNewMail = Outlook.Application.CreateItem(olMailItem)
With xNewMail
.CC = xMailItem.CC
.BCC = xMailItem.BCC
.Subject = xMailItem.Subject
.HTMLBody = xMailItem.HTMLBody
.Send
End With
xMailItem.CC = ""
xMailItem.BCC = ""
End Sub
3. Em seguida, salve e feche a janela de código.
4. A partir de agora, ao enviar um e-mail com anexos, apenas os destinatários no campo Para podem receber os anexos, e os destinatários em CC e BCC só podem receber a mensagem sem anexos.
Melhores ferramentas de produtividade de escritório
Kutools for Outlook - Mais de 100 recursos poderosos para turbinar seu Outlook
🤖 Assistente de correio AI: E-mails profissionais instantâneos com magia de IA – um clique para respostas geniais, tom perfeito, domínio multilíngue. Transforme o envio de e-mails sem esforço! ...
📧 Automação de e-mail: Fora do escritório (disponível para POP e IMAP) / Agendar envio de e-mails / CC/BCC automático por regras ao enviar e-mail / Encaminhamento automático (regras avançadas) / Adicionar saudação automaticamente / Divida automaticamente e-mails de vários destinatários em mensagens individuais ...
📨 Gestão de E-mail: Lembre-se facilmente de e-mails / Bloquear e-mails fraudulentos por assuntos e outros / Apagar Emails Duplicados / Pesquisa Avançada / Consolidar pastas ...
📁 Anexos Pró: Salvar em lote / Desanexar lote / Comprimir em Lote / Salvamento automático / Desanexação Automática / Compressão automática ...
???? Interface Mágica: 😊Mais emojis bonitos e legais / Aumente a produtividade do seu Outlook com visualizações com guias / Minimize o Outlook em vez de fechar ...
???? Maravilhas com um clique: Responder a todos com anexos recebidos / E-mails antiphishing / 🕘Mostrar fuso horário do remetente ...
👩🏼🤝👩🏻 Contatos e calendário: Adicionar contatos em lote de e-mails selecionados / Dividir um grupo de contatos em grupos individuais / Remover lembretes de aniversário ...
Sobre Características 100 Aguarde sua exploração! Clique aqui para descobrir mais.