使用Excel VBA创建的电子邮件(HTML)中的行高

时间:2017-05-26 12:46:54

标签: html excel vba excel-vba

我有以下VBA代码在Excel电子表格中创建电子邮件:

& vbCr & <p style="line-height: 50%">I want to have a specific line hight because this</p>

代码本身运作完美。但是,当我看到电子邮件时,用HTML编写的三个句子之间有一个很大的行高。

如果我试着这样做:

{{1}}

它也不起作用,可能是由于混合了VBA和HTML代码。

您是否知道如何在VBA代码中更改电子邮件中的行高?

1 个答案:

答案 0 :(得分:1)

由于这是HTML格式的电子邮件,因此还必须插入HTML开始和结束标记。

Dim body_ As String
    body_= "<p> Hello </p>" _
         & "<p> I want to have a specific line hight because this </p>" _
         & "<p> line height is too much space </p>" _
         & "<p> How I can decrease this line height? </p>"

.BodyFormat = olFormatHTML
.HTMLBody = "<html><head></head><body>" & body_ & "</body></html>"