Body Text in Email

Hi,

I am sending emails from Excel using VBA. I have created the mail and it sends fine, but I want to put more than one line in the body of the email.

So far I have the following to define the email. Which will add one line of text to the body, however I want to insert a blank line and then another line of text after the first

With OutMail
.To = ActiveCell.Offset(0, 8).Value
.Subject = ActiveCell.Offset(0, 10).Value
.body = ActiveCell.Offset(0, 9)
.Send 'Or use Display
End With

Any help greatly appreciated

Nick

Hi nickysquawkes,

if you know how many lines you want you can use a vbcrlf.

vbcrlf starts a new line.

Example:

"Hi" & vbcrlf & "Hello"

this will equal:

Hi
Hello

so put in two vbcrlf and get:

Hi

Hello

"Hi" & vbcrlf & vbcrlf & "Hello"

just adapt that to your code something like this:

With OutMail
.To = ActiveCell.Offset(0, 8).Value
.Subject = ActiveCell.Offset(0, 10).Value
.body = ActiveCell.Offset(0, 9) & vbcrlf & vbcrlf & "This is on diff line :)"
.Send 'Or use Display
End With

Cheers Stuie

Worked just right

No Prob

hi,

Can we add an attachment an Image to the mail.
the image link will be indicated in any cell of the excel.
Any suggestion?