Indent bullet point in outlook with vba

[Even]

Hi, I have this code that I use to create a standard mail. However, I am struggling to indent the bullet points. Does anybody know how to do that? It is the condition A and B that I want to indent.

Sub Send_Mail()

    Dim xOutApp As Object
    Dim xOutMail As Object
    Dim xOutMsg As String
    On Error Resume Next
    Set xOutApp = CreateObject("Outlook.Application")
    Set xOutMail = xOutApp.CreateItem(0)
    xOutMsg = "Hi,<br /><br /> Please view the below renewal conditions.<br /><br />" & _
    "<b>Product X</b><br/> General terms is x % increase. In addition: <br />" & _
    "<li> Condition A: X% </li> <br />" & _
    "<li> Condition B: X% </li>  <br />"
    With xOutMail
        '.From = ""
        .To = ""
        .CC = ""
        .BCC = ""
        .Subject = ""
        .HTMLBody = xOutMsg
        .Display
    End With
    Set xOutMail = Nothing
    Set xOutApp = Nothing
End Sub

 

[Micron]

I recently read a thread somewhere where the OP wanted to remove the indent. The answer was to use in line css styles, which is not something I know much about. However, that might get you started. I can't recall if the fact that you are not using list tags (e.g. <ul>) is responsible for your problem - my html is very rusty.

 

[Even]

Thanks, Micron. Almost
It does indent the text. However, it also makes an extra space down.

 

[Micron]

That was the problem to start with and somehow the inline style was the fix IIRC. After looking through a dozen pages of my recent posts I found the thread. Note that while the thread refers to the problem as a margin, I'd say that's incorrect if you look at the picture of what is wanted. That space is normal IMO and I wouldn't bother with it, but to each their own.

VBA remove margin before bulletpoint/unordered list in email

Hello! I am using VBA to send out emails containing a text body made up of bullet points with varying lengths (using the code from smozgur in this thread: Use VBA to enter a varying range of bullet points into body of email). Which creates a reference to the bullet list in the body text instead...

www.mrexcel.com