Como enviar um e-mail em um horário específico do dia no Excel?
Em alguns casos, pode ser necessário atrasar o envio de um e-mail para um horário específico durante o seu trabalho. Você sabe como fazer isso? Este artigo vai mostrar um método para enviar um e-mail em um horário específico do dia no Excel.
Enviar um e-mail em um horário específico do dia com código VBA
Enviar um e-mail em um horário específico do dia com código VBA
Os seguintes códigos VBA podem ajudá-lo a enviar um e-mail em um horário específico do dia no Excel. Por favor, siga os passos abaixo.
1. Pressione as teclas Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.
2. Na janela Microsoft Visual Basic for Applications, clique em Inserir > Módulo. Em seguida, copie o código VBA abaixo na janela Módulo.
Código VBA 1: Enviar um e-mail em um horário específico do dia no Excel
Sub SendEmail()
'Updated by Extendoffice 2018/3/5
Set olApp = CreateObject("Outlook.application")
Set objMail = olApp.CreateItem(olMailItem)
With objMail
.Display
.To = "Email address"
.Subject = "Send email"
'HTML for fun
'.BodyFormat = olFormatHTML
.HTMLBody = "<HTML><H2>Email Body</BODY></HTML>"
'.Send
End With
End Sub3. Clique duas vezes em ThisWorkbook no painel esquerdo para abrir a janela ThisWorkbook (Código). Depois, copie o código VBA 2 abaixo na janela. Veja a captura de tela:
Código VBA 2: Enviar um e-mail em um horário específico do dia no Excel
Private Sub Workbook_Open()
'Updated by Extendoffice 2018/3/5
Application.OnTime TimeValue("11:00:00"), "SendEmail"
End SubObservação: No código 2, especifique o horário de envio conforme sua necessidade.
4. Pressione as teclas Alt + Q para fechar a janela Microsoft Visual Basic for Applications.
5. Clique em Arquivo > Salvar Como > Procurar.
6. Na caixa de diálogo Salvar Como, escolha uma pasta para salvar a pasta de trabalho, nomeie-a conforme necessário, selecione o formato Pasta de Trabalho Habilitada para Macro do Excel na lista suspensa Especificar Formato de Salvamento e, por fim, clique no botão Salvar. Veja a captura de tela:
A partir de agora, assim que o horário específico for alcançado, o e-mail será exibido automaticamente. Por favor, clique no botão Enviar para enviar este e-mail.
Desbloqueie a Magia do Excel com o Kutools AI
- Execução Inteligente: Realize operações de células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
- Fórmulas Personalizadas: Gere fórmulas sob medida para otimizar seus fluxos de trabalho.
- Codificação VBA: Escreva e implemente código VBA sem esforço.
- Interpretação de Fórmulas: Compreenda fórmulas complexas com facilidade.
- Tradução de Texto: Supere barreiras linguísticas dentro de suas planilhas.
Artigos relacionados:
- Como enviar automaticamente um e-mail com base no valor da célula no Excel?
- Como inserir assinatura em e-mail do Outlook ao enviar por VBA no Excel?
- Como enviar e-mail com corpo de e-mail em HTML no Excel?
- Como enviar e-mail com texto em negrito/tamanho/cor/sublinhado especificado no Excel?
- Como enviar e-mail sem o Outlook no Excel?
- Como enviar um gráfico específico em um e-mail com VBA no Excel?
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins