vba html email

[jono19872006]

Hi

So I have been using some code to autmate the sending of emails which works fine.

However i have been trying to give it a face lift, I currently have pictures in my email signature so want the email to be a html email.

I can get this to work by changing the .body to .HTMLBody.


What I noticed is in the HTML that it doesnt add in new lines </SPAN>eg with the code vbNewLine, I have found the HTML equivalent of "<br>"</SPAN>

However the body of my email is currently a defined cell and the signature with a few lines in between.

What I am struggling with is, if there are new lines in the actual cell's text which is references then they are not replicated in the email.

How can I build into the code a check/replace so that everytime there is the char(10) ie a new line it adds a new line into the HTML email ie "<br>"</SPAN>

?

 

[jono19872006]

Html new line of br inside "<> "

 

[FormR]

How can I build into the code a check/replace so that everytime there is the char(10) ie a new line it adds a new line into the HTML

Does something like this work for you?

Dim sBody As String
sBody = Replace(Range("A1").Value, Chr(10), " < br > ") 'Remove the spaces around < and > 
    'email code
    .HTMLBody = sBody