VBA-Outlook Email.HTMLBody行间距？

他的问题很小，但让我困惑。我正在自动从excel发送电子邮件。出于某种原因，以下代码使最后一行的间距大于正常间距：

Sub emailspacing()
Dim OutApp As Object
Dim OutMail As Object
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)
With OutMail
    .HTMLBody = "<p style='font-family:calibri;font-size:14.5'>Thanks for your help</p>"
    .display
End With

---

有人知道如何将样式化的HTML文本与正常的行距结合起来吗？

破解了它！这需要添加到p样式中：

---

边缘底部：.0001pt

破解它！这需要添加到p样式中：

---

边缘底部：.0001pt

你说的“间隔”是什么意思？我在最后一行之后没有间距（因为这是最后一行），两行之间的间距对我来说是一致的（Outlook 2010）。当底线高亮显示时，它会更清晰。当我这样做时，生产线大约是正常尺寸的150%。我正在通过rangetohtml向底部添加额外的片段，而增加的间距看起来不正确您所说的“间距”是什么意思？我在最后一行之后没有间距（因为这是最后一行），两行之间的间距对我来说是一致的（Outlook 2010）。当底线高亮显示时，它会更清晰。当我这样做时，生产线大约是正常尺寸的150%。我通过rangetohtml向底部添加了额外的部分，增加的间隙看起来不太合适

Sub emailspacing()
Dim OutApp As Object
Dim OutMail As Object
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)
With OutMail
    .HTMLBody = "Thanks for your help"
    .display
End With