How to handle font style in email body via VBA

Hi everyone,

I am building a macro to send out mails with specific content.

One portion of the mail content would be in Bulletin Points. Example -

________________________________________
Usage Policy:
Why we do this…
• First point.
• Second point.
• Third point.
Terms & conditions:
• First point.
• Second point.
• Third point.
________________________________________

I couldnt get the right format in the body of the code.
Could someone please help.

My code :

    Dim OutApp As Object
    Dim Itm As Object

    Set OutApp = CreateObject("Outlook.Application")
    Set Itm = OutApp.CreateItem(0)

          With Itm
                .To = "[email protected]"
                .Subject = "Subject"
                .Body = "Txt"   ' (Bulletin Points should go here)
                .Send 
            End With

You need to use the .HtmlBody property instead of just .Body then you use standard html to get what you want:

HTML Code: 

Hi thank you for the response.
But when I use .HTMLBody I couldnt bring the hyperlink of an excel cell to the body of e- mail

For example consider i am taking the hyperlink from a cell in a variable - strbody1

strbody1 = Cells(cell.Row, "E").Hyperlinks(1).Address

and when I use this inside .HTMLBody, hyperlink is not displaying in the e-mail. I am getting blank output in the e-mail

    Dim OutApp As Object
    Dim Itm As Object

    Set OutApp = CreateObject("Outlook.Application")
    Set Itm = OutApp.CreateItem(0)

    strbody1 = Cells(cell.Row, "E").Hyperlinks(1).Address

          With Itm
                .To = "[email protected]"
                .Subject = "Subject"
                .HTMLBody = strbody1  
                .Send 
            End With

I think i should use <a> </a> for hyperlink. But I couldnt use it as I will taking the hyperlink from a cell value and not a direct link

can you please help me on this.