Como desativar ou desligar o aviso de "sem assunto" no Outlook?

Author: Siluvia Last Modified: 2025-08-06

Quando você está usando o Outlook 2010 e 2013, se enviar mensagens de email sem assunto, uma caixa de aviso de "sem assunto" aparecerá toda vez para lembrá-lo. Se você realmente não quiser preencher o assunto, o aviso de "sem assunto" será um grande incômodo para você. Para ajudar os usuários do Outlook a se livrarem do aviso de "sem assunto", fornecemos uma solução no tutorial a seguir.

Desativar ou desligar o aviso de "sem assunto" no Outlook

Desativar ou desligar o aviso de "sem assunto" no Outlook

No Outlook 2007, não há nenhum aviso se você enviar uma mensagem de email sem assunto. Essa função está habilitada no Outlook 2010 e 2013. No entanto, não há nenhuma opção para desativar ou desligar diretamente esse aviso de "sem assunto". Neste tutorial, mostraremos o código VBA para alcançar isso.

1. Por favor, pressione as teclas "Alt" + "F11" para abrir a caixa de diálogo "Microsoft Visual Basic for Applications".

2. Expanda o "Projeto1" > "Objetos do Microsoft Outlook" clicando duas vezes neles. Depois, clique duas vezes em "EstaSessãoDoOutlook" para abrir a janela "VbaProject.OTM".

the screenshot of turning off or disable no subject warning in Outlook 1

3. Copie e cole o código VBA abaixo na janela.

VBA: Desativar ou desligar o aviso de "sem assunto"

Option Explicit
Private WithEvents oInspectors As Outlook.Inspectors

Private Sub Application_Startup()
    Set oInspectors = Outlook.Inspectors
End Sub

Private Sub oInspectors_NewInspector(ByVal Inspector As Inspector)
    Dim oItem As Object
    On Error GoTo ExitProc
    Set oItem = Inspector.CurrentItem
    If oItem.Sent = False Then
        If oItem.Subject = "" Then oItem.Subject = " "
    End If
ExitProc:
    Set oItem = Nothing
    Set Inspector = Nothing
End Sub

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    On Error Resume Next
    Item.Subject = Trim(Item.Subject)
End Sub

Private Sub Application_Quit()
    Set oInspectors = Nothing
End Sub

4. Clique no botão "Salvar" para salvar o código VBA.

5. Reinicie o aplicativo Outlook.

Então, o código VBA entrará em vigor. Quando você enviar uma mensagem sem assunto, a caixa de aviso de "sem assunto" não será mais exibida.

Observação: Certifique-se de que a opção "Ativar todas as macros" esteja marcada. (Por favor, verifique isso clicando em "Arquivo" > "Opções" > "Central de Confiabilidade" > "Configurações da Central de Confiabilidade", e na caixa de diálogo "Central de Confiabilidade", escolha "Configurações de Macro" > "Ativar todas as macros"), veja a captura de tela: