如何在vb中声明olFormatHtml

Question

我正在尝试发送格式为HTML的邮件但是我收到一条错误，表明未声明olFormatHtml。我该如何申报？

Answer 1

将olFormatHtml替换为Outlook.OlBodyFormat.olFormatHTML

Answer 2

我在Excel 2007中使用VBA将工作簿附加到电子邮件并格式化该电子邮件的正文。我刚尝试了这个建议并得到了一个运行时错误438：对象不支持这个属性或方法。

相反，我设置.bodyformat = 2以将电子邮件文本显示为html，并且它有效。例如....

Set Outlook = CreateObject("Outlook.Application")
Set MailItem1 = Outlook.CreateItem(0)

With MailItem1
    .BodyFormat = 2
    'sample formatting change....
    .htmlbody = "<font color = 'red'>" & "SAMPLE TEXT" & "</font><br/>"
    .display
End With

Set MailItem1 = Nothing
Set Outlook = Nothing