Página 1 de 1

Ajuda a concluir Macro

Enviado: 26 Set 2017 às 12:59
por LuisOliveira
Boa tarde,
Queria ajuda para acabar uma macro. O que pretendo é saber como fazer para preencher o "corpo" de um e-mail com várias linhas, de acordo com o que descrevo abaixo:

Bom dia,
Envio em anexo o referido em assunto.

Melhores cumprimentos.


Abaixo descrevo a parte do código da macro referida.


With EmailItem
.Subject = ""
.Body = "Bom dia, em anexo o referido em assunto. Melhores Cumprimentos. "
.To = ""
.CC = ""
.Importance = olImportanceNormal
.Attachments.Add Arquivo
.Display


Abraço e obrigado

Re: Ajuda a concluir Macro

Enviado: 26 Set 2017 às 13:20
por alexandrevba
Boa trade!!

Já tentou algo assim..
Código: Selecionar todos
Dim sMsgBody As String
 
sMsgBody = "AleVBA" & vbCr & vbCr
sMsgBody = sMsgBody & "Forum Guru do Excel" & vbCr

 
.body = sMsgBody

Att

Re: Ajuda a concluir Macro

Enviado: 26 Set 2017 às 14:05
por LuisOliveira
Ainda não, mas não assume na mesma como sendo unicamente uma linha de texto?

Re: Ajuda a concluir Macro

Enviado: 26 Set 2017 às 14:25
por LuisOliveira
Já consegui :)

fiz assim:

. Body= "Bom dia," & VbCrLf & " Em anexo o referido em assunto." & VbCrLf & "Cumprimentos,"


Obrigado!