Email from text box with formatting

I have a template for the email contained in a shape in an Excel sheet, and the text in this Shape also contains bold formatting.
However, when I run my macros to create an email from this template it does not keep the formatting.
Please advise what can be changed for below code to generate the email and keep the format the same as in Excel shape.

Please Login or Register  to view this content.

You have two problems.

The Text property of Characters does not return the format of the text, only the plain text. To extract the format, you will have to copy the text character by character, including the formatting for that character. I have not found a way to copy the text and bring the formatting with it. For example, if you run this code, it will show each character and the font, color, and bolding for that character:

Please Login or Register  to view this content.

So you will need a loop that adds the appropriate formatting for each character as you extract it from the text.

The second problem is that the Body attribute of email does not have any formatting; it is plain text only. Even if you put formatted text into that field, the formatting would be lost. If you want formatting you have to use HTMLBody, and use HTML code for the formatting. For a bold character you would need to format it as

<b>A</b>