Para fazer o Excel mandar email, você pode usar a linguagem de programação VBA (Visual Basic for Applications) para automatizar o processo. Veja abaixo os passos para realizar essa tarefa:
Abra o Excel e crie uma planilha que contenha informações relevantes para o envio do email, como endereço de email, assunto e corpo da mensagem.
Pressione a tecla "Alt" e "F11" para abrir o editor de VBA.
Clique em "Inserir" e selecione "Módulo" para criar um novo módulo.
Na janela do módulo, escreva o seguinte código VBA:
Sub EnviarEmail()
Dim OutlookApp As Object Dim OutlookMail As Object Dim EmailDestino As String Dim AssuntoEmail As String Dim CorpoEmail As String
EmailDestino = Range("A1").Value AssuntoEmail = Range("B1").Value CorpoEmail = Range("C1").Value
Set OutlookApp = CreateObject("Outlook.Application") Set OutlookMail = OutlookApp.CreateItem(0)
With OutlookMail .To = EmailDestino .Subject = AssuntoEmail .Body = CorpoEmail .Send End With
Set OutlookMail = Nothing Set OutlookApp = Nothing
End Sub
Substitua o valor "Range("A1").Value" pelo endereço de email do destinatário, "Range("B1").Value" pelo assunto do email e "Range("C1").Value" pelo corpo da mensagem.
Salve o módulo com o nome "EnviarEmail".
Volte para a planilha do Excel e selecione a célula que você deseja associar ao botão de envio de email. No exemplo abaixo, a célula selecionada é a B2.
Clique em "Inserir" e selecione "Botão de comando" na seção "Formulários".
Desenhe o botão no local desejado da planilha e selecione a opção "Atribuir macro" na janela que se abre.
Selecione a macro "EnviarEmail" e clique em "OK".
Utilize as informações fornecidas na planilha para enviar o email ao clicar no botão.
Pronto! Com esses passos, você pode fazer o Excel mandar email de forma automatizada. Lembre-se de que é necessário ter uma conta de email configurada no Outlook para que esse código funcione.