Como evitar que usuários enviem emails sem assunto inserido no Outlook?
Enquanto você envia um e-mail pelo Outlook, em alguns momentos, você pode enviar e-mails sem inserir o assunto, o que talvez não seja um bom hábito. Existe alguma maneira de forçar os usuários a enviar e-mail com um assunto no Outlook?
Impedir o envio de e-mails sem assunto inserido com VBA
Impedir o envio de e-mails sem assunto inserido com VBA
Não há outra maneira, exceto o código VBA, de resolver esse problema.
1. Habilite o Outlook, pressione Alt + F11 chaves para abrir Microsoft Visual Basic para Aplicações janela.
2. Duplo click Esta sessão do Outlook no Project1 painel e, em seguida, copie e cole o código abaixo no script em branco.
VBA: Impedir o envio de e-mail sem assunto
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
'UpdatebyExtendoffice20180511
Dim xObject As Object
On Error Resume Next
If Item.Class <> olMail Then Exit Sub
Set xObject = CreateObject("VBScript.Regexp")
With xObject
.Global = True: .Pattern = "^\x20*$"
If .test(Item.Subject) = True Then
MsgBox "No subject entered", vbInformation, "Kutools for Outlook"
Cancel = True
End If
End With
End Sub
3. Salve o código, agora se o e-mail for enviado sem assunto, aparecerá uma caixa de diálogo para lembrá-lo de inserir o assunto.
Observação: Este código VBA funciona para todas as contas no Outlook
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.
