Cursos, tutoriais e planilhas prontas

Enviar emails pelo Excel

Share on facebook
Share on twitter
Share on linkedin
Share on whatsapp
Share on telegram

Leia também...

Enviar emails pelo Excel

Já quis enviar emails automaticamente através de suas planilhas mas nunca soube como fazer isso? Bom, o video abaixo te ensina a como enviar e-mails pelo Excel de maneira fácil utilizando o Outlook, mas isso não quer dizer que você precisa ter uma conta de e-mail outlook.com, no vídeo mesmo mostramos a como usar uma conta do Gmail para tal.


Vídeo explicativo de como enviar emails pelo Excel

Logo abaixo do vídeo está o código VBA que você irá precisar.

Coloque o vídeo em tela cheia para assistir normalmente

 


Código VBA para enviar emails pelo Excel

Sub Enviar_Email()
 Dim OutlookApp As Object
 Dim OutlookMail As Object
 Set OutlookApp = CreateObject("Outlook.Application")
 Set OutlookMail = OutlookApp.CreateItem(0)

On Error Resume Next

With OutlookMail
 .SentOnBehalfOfName = "zzz@zzz.com" 'Remetente
 .To = "xxx@xxx.com" 'Enviar para
 .CC = "" 'Com cópia para
 .BCC = "" 'Com cópia oculta para
 .Subject = "Assunto Importante" 'Assunto
 
 'ESCOLHA ABAIXO ENTRE .HTMLBody e .Body
 '.HTMLBody - Possibilita uma personalização maior do texto, mas não _
 identifica quebra de linha de textos em células.
 '.Body - Identifica quebra de linha de texto em células _
 mas não permite personalizações.
 .Body = "Aqui está a mensagem do e-mail."
 'ESCOLHA ABAIXO ENTRE .Display e .Send
 '.Display - Usado para exibir o email na tela, não enviar automaticamente
 '.Send - Usado para enviar automaticamente, sem exibi-lo na tela
 .Display
 End With
 
 On Error GoTo 0
 Set OutlookMail = Nothing
 Set OutlookApp = Nothing
End Sub

'DICAS DE HTMLBody
'<br> Próxima linha
'<b> Texto em negrito </b>
'<i> Texto em itálico </i>
'<s> Texto riscado </s>
'<u> Texto sublinhado </u>
'<font color=""red""> Texto em vemelho </font>
'<font color=""blue""> Texto em azul </font>
'<font color=""darkblue""> Texto em azul escuro </font>

Acompanhe o Função Excel
facebook-logo youtube-logo googleplus-logo twitter-logo

Histórico de cotações

Histórico de cotações Baixe cotações históricas de qualquer ativo cotado em mais de 50 bolsas de valores no mundo, direto do Excel. Selecione os parâmetros

Ler »

2 thoughts on “Enviar emails pelo Excel

  1. boa tarde,

    Como faço para anexar imagens no corpo do e-mail?

    Estou usando

    Set Mensagem = ThisWorkbook.Sheets(2).Range(“B2:I32”)

    Porém mesmo havendo imagens e ícones na planilha dentro desse Range ele não vão junto quando executo o código.

Deixe um comentário ou uma dúvida

Compartilhe

Share on facebook
Share on twitter
Share on linkedin
Share on whatsapp
Share on telegram

Planilhas prontas

Composição de custos

Calcule e analise todos os custos diretos da produção de seus produtos, seja qual for o tamanho da sua empresa e seu ramo de atuação.

Gere relatórios detalhados que exibem a composição do custo de cada produto, de forma individual ou conjunta. Melhor precifique seus produtos mantendo uma margem de lucro de que você deseja.

Faça simulações com preços de insumos e veja o impacto de cada um na composição total de seu produto final.

Saber mais »

Leia também...

Logo - Ícone

COMPARTILHE COM O MUNDO

Gostou do artigo? Não seja egoísta, compartilhe!

Share on facebook
Facebook
Share on twitter
Twitter
Share on linkedin
LinkedIn
Share on whatsapp
WhatsApp