Escola Saberexcel VBA Estudos® - Treinamentos com Macros, Fórmulas e Funções
'Esse macro envia email com anexo para vários emails,
'insere dados no corpo do email e dados no corpo, mude o caminho do direto do arquivo
ou planilha para realização do seu teste que for enviar anexo para os emails que relacionar no macro.
Fique com Deus, Expedito Marcondes.
'- - - - - - - - - - - - - - - -
Sub ENVIAR_EMAIL_ADD_PLANILHA()
Dim MyOlapp As Object, MeuItem As Object
Set MyOlapp = CreateObject("Outlook.Application")
Set MeuItem = MyOlapp.CreateItem(olMailItem)
With MeuItem
.to = ("[email protected];[email protected]")
.Subject = "RELATORIO: PAGAMENTOS DE JANEIRO/2020"
.Body = "Bom dia Sr." & Plan1.[d1].Value & vbCrLf & _
"Anexo estamos lhe enviando a planilha Relatório" & vbCrLf & _
"Janeiro/2020 " & _
"Saudações " & vbCrLf & _
Plan1.[D2].Value
'troque o diretorio do documento que queira enviar 'add' anexo.
.Attachments.Add "C:\SaberExcel\decompor_treina_email.xlsm"
.Display
End With
End Sub
'- - - - - - - - - - - - -'- - - - - - - - - - - - -
Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Escola Saberexcel VBA Estudos® - Treinamentos com Macros, Fórmulas e Funções.
Baixe o exemplo de planilha contendo os macros acima:
Excel - Dicas Microsoft Excel VBA Excel VBA - Envia Email Excel vba planilha email envia anexo e corpo
Excel vba planilha email envia anexo e corpo
PROMOÇÃO DIDÁTICOS SABEREXCEL
Adquira já o Acesso Imediato
à Area de Membros
Aprenda Excel VBA com Simplicidade de
códigos e Eficácia, Escrevendo Menos e
Fazendo Mais.
'-------------------------------------'
Entrega Imediata:
+ 500 Video Aulas MS Excel VBA
+ 35.000 Planilhas Excel e VBA
+ Coleção 25.000 Macros MS Excel VBA
+ 141 Planilhas Instruções Loops
+ 341 Planilhas WorksheetFunctions(VBA)
+ 04 Módulos Como Fazer Excel VBA
+ Curso Completo MS Excel VBA
+ Planilhas Inteligentes
Pesquisa Google SaberExcel
Contatos Equipe Saberexcel
Publicidade Google
<script type="text/javascript"><!--
google_ad_client = "ca-pub-2317234650173689";
/* retangulo 336 x 280 */
google_ad_slot = "0315083363";
google_ad_width = 336;
google_ad_height = 280;
//-->
</script>
<script type="text/javascript"
src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script>
Publicidade
Tags Populares
RSFirewallProtected
Google Associados
Depoimentos
Adicione Saberexcel Favoritos
Aprenda tudo sobre o Aplicativo Microsoft Excel VBA
Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel,
Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA
Comentários
Gostaria de uma planilha que todos possam utilizar e enviar para mim de diversos locais diferentes, o que devo colocar no campo abaixo:
.Attachments.Add "C:\SaberExcel\ decompor_treina _email.xlsm"
como eu adiciono minha assinatura no corpo do email?
Agradeço muito por vc ter compartilhado seu conhecimento!
vc é o cara!
Muito boa essa macro.
Por favor, como faria para inserir no corpo do e-mail um intervalo de células (ao invés de só uma célula)?
Abraço
essa macro é muito boa, mas como faço para enviar um anexo diferente para cada email?
desde ja obrigado.
Aguardo, obrigado
Assine o RSS dos comentários