Este fórum está sendo desativado

[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

[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

[LuisOliveira]

Ainda não, mas não assume na mesma como sendo unicamente uma linha de texto?

[LuisOliveira]

Já consegui

fiz assim:

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


Obrigado!