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 em um momento específico durante seu trabalho. Você sabe como fazer isso? Este artigo irá mostrar a você um método de envio de e-mail em uma hora específica do dia no Excel.
Envie um e-mail em um horário específico do dia com o código VBA
Envie um e-mail em um horário específico do dia com o código VBA
Os códigos VBA a seguir podem ajudá-lo a enviar um e-mail em um horário específico do dia no Excel. Faça o seguinte.
1. aperte o outro + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.
2. No Microsoft Visual Basic para Aplicações janela, clique em inserção > Módulo. Em seguida, copie o código VBA abaixo para a 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 Sub
3. Clique duas vezes em ThisWorkbook no painel esquerdo para abrir a janela ThisWorkbook (Code). Em seguida, copie o código 2 do VBA abaixo para a janela. Veja a imagem:
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 Sub
Note: No código 2, especifique o tempo de envio conforme necessário.
4. aperte o outro + Q chaves para fechar o Microsoft Visual Basic para Aplicações janela.
5. Clique Envie o > Salvar como > Procurar.
6. No Salvar como caixa de diálogo, por favor, escolha uma pasta para salvar a pasta de trabalho, nomeie como você precisa, selecione Pasta de trabalho habilitada para macro do Excel formato do Salvar como tipo lista suspensa e, finalmente, clique no Salvar botão. Veja a imagem:
A partir de agora, assim que chegar a hora específica, o determinado e-mail será exibido automaticamente. Por favor clique no ENVIAR botão para enviar este e-mail.
Artigos relacionados:
- Como enviar e-mail automaticamente com base no valor da célula no Excel?
- Como inserir assinatura no 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 o formato de texto em negrito / tamanho / cor / sublinhado especificado no Excel?
- Como enviar e-mail sem Outlook no Excel?
- Como enviar um gráfico específico em um email com vba no Excel?
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!