Adding bold into a email macro

[Laurence D]

Hi,

I have been toying with an email macro that bulk emails clients with taylor made near identical emails in the click of a button.

I am almost done however I have encountered a minor issue whilst trying to add a bit of flair to the signature. Does anybody know how I would correct this code so that the cell contents for K2 come through into my drafts as bold?

Email_Body = ActiveSheet.Range("J2") & vbNewLine & ActiveSheet.Range("K2").Font.Bold = True

Thanks,
Laurence

 

[=ODIN=]

You could try setting the cell to bold before assigning it to Email_Body:

ActiveSheet.Range("K2").Font.Bold = True
Email_Body = ActiveSheet.Range("J2") & vbNewLine & ActiveSheet.Range("K2")

I dont think that will work though. I think Email_Body will only hold characters of the text (it's a string) without any formatting. You will probably need to add html tags or something. HTML Tags would look like this I think:

Email_Body = ActiveSheet.Range("J2").value & vbNewLine & <strong><b"""<strong> & ActiveSheet.Range("K2").value & "</b" &#34

 

[=ODIN=]

Sorry, to try the HTML suggestion from my last post, you would use the code below, but remove the ' single apostrophes from the html tags --- i couldn't figure out how to write it here without the post just making my text bold and removing them.

Email_Body = ActiveSheet.Range("J2").value & vbNewLine & "<'b>" & ActiveSheet.Range("K2").value & "<'/b>"

 

[Norie]

Laurence

To apply formatting to an email you would need to use HTMLBody instead of Body and compose the message using appropriate HTML code.

 

[Laurence D]

Thanks guys,

It can work using the .HTMLbody code but it poses new problems for me with a lack of spacing. I may just have to redesign the way I was planning to use this macro.

The "<B>" & "/B>" tactic suggested by you Odin did not work for me it just added the text at the end:
Hello <o></o>
Humpty Dumpty sat on a wall,
Humpty Dumpty had a great fall;
All the king's horses and all the king's men
Couldn't put Humpty together again. <o></o><B>Mother Goose</B>

The .HTMLBody code did work but poses new problems to the look of the final email as the html code seems to remove any and all spacing:

Hello Humpty Dumpty sat on a wall, Humpty Dumpty had a great fall; All the king's horses and all the king's men Couldn't put Humpty together again.

Mother Goose

I will keep tinkering and I am sure I will prevail!

 

[Laurence D]

Wow! Sorry for the bolding... The <'B> works really well in this format!

 

[=ODIN=]

Right?! That was messing me up too.

If the .htmlbody is working, try concatenating in <'br> anytime you want the following text on a new line (of course removing the apostrophe)