Como enviar automaticamente um e-mail recorrente periodicamente com o Outlook VBA

Soluções do Outlook 29 de Setembro de 2025
Compartilhe agora:

Deseja enviar um e-mail recorrente em um intervalo fixo, como toda terça-feira? Este artigo examinará esse problema e ensinará como alcançá-lo usando uma tarefa recorrente e o Outlook VBA.

Talvez você saiba como agendar o envio de um e-mail recorrente, pois o Outlook possui um suporte nativo para adiar a entrega. Mas esse recurso pode simplesmente permitir que você especifique um horário para enviar um e-mail. Ele não pode permitir que o Outlook envie automaticamente o e-mail recorrente periodicamente, por exemplo, o 3rd Segunda-feira de cada mês, etc. Portanto, se você deseja enviar um e-mail específico regularmente, precisa fazer alguns esforços extras. Aqui está um método rápido, que exigirá que você crie um item de tarefa recorrente e copie os seguintes códigos VBA para o projeto “ThisOutlookSession”.

Envie automaticamente um e-mail recorrente periodicamente

  1. Em primeiro lugar, inicie o Outlook e depois mude para o painel Tarefas.
  2. Em seguida, clique no botão "Nova tarefa" na faixa de opções.
  3. Na janela “Nova tarefa” subsequente, você precisa criar uma tarefa recorrente:
  • Em primeiro lugar, digite “enviar um e-mail periodicamente” na linha de assunto da tarefa.
  • Em seguida, clique no botão “Recorrência” na guia “Tarefa”,
  • Em seguida, defina a recorrência da tarefa de acordo com suas necessidades.
  • Depois disso, clique em “OK” para salvar a recorrência.
  • Por fim, defina o horário do lembrete e clique no botão "Salvar e fechar".Criar um item de tarefa recorrente
  1. Depois disso, vá para a guia “Desenvolvedor” e clique no botão “Visual Basic” para obter acesso à janela do editor VBA.
  2. Posteriormente, você deve copiar os seguintes códigos VBA para o projeto “ThisOutlookSession”.
Private Sub Application_Reminder(ByVal Item As Object)
    Dim objPeriodicalMail As MailItem
 
    If Item.Class = olTask Then
       If InStr(LCase(Item.Subject), "send an email periodically") Then
          Set objPeriodicalMail = Outlook.Application.CreateItem(olMailItem)
          'Change the following email information as per your actual needs
          With objPeriodicalMail
               .Subject = "Test"
               .To = "boss@datanumen.com"
               .HTMLBody = "<HTML><BODY>type body here</HTML></BODY>"
               .Attachments.Add ("C:\Attachments\DataNumen.docx")
               .Importance = olImportanceHigh
               .ReadReceiptRequested = True
               .Send
          End With
       End If
    End If
End Sub

Códigos VBA - Envie um e-mail quando o lembrete de item de tarefa aparecer

  1. Posteriormente, você deve assinar este código e alterar suas configurações de macro para permitir a macro assinada digitalmente.
  2. A partir de agora, sempre que o lembrete da nova tarefa recorrente aparecer, o Outlook redigirá e enviará automaticamente o e-mail.

Nota: Depois de enviar o e-mail recorrente, lembre-se de marcar o item de tarefa atual como concluído.

Lide com os problemas do Outlook com tato

Como o Outlook é vulnerável a vários fatores, você precisa se preparar para o pior o tempo todo. Por exemplo, você deve manter uma reputação e comprovada Recuperação do Outlook utilitário nas proximidades, como DataNumen Outlook Repair. Assim, mesmo se você encontrar corrupção de dados PST, poderá recuperar os dados comprometidos com utmost facilidade.

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 reparar SQL Server e produtos de software de reparo do Outlook. Para mais informações visite www.datanumen.com

Compartilhe agora:

Comentários estão fechados.