Outlook宏新消息丢失格式

时间:2011-08-17 05:46:13

标签: vba outlook

我正在编写一个outlook子过程,它接受当前选择的电子邮件,解析它,并创建一个新的电子邮件消息。解析很简单:从邮件的第一行提取电子邮件地址,然后正文的其余部分是新邮件中的常规电子邮件正文。

我正在使用此基本代码设置新邮件的正文:

Set newMsg = Outlook.Application.CreateItem(olMailItem)
With newMsg
   .BodyFormat = olFormatHTML
   .Body = newBody
   '... set subject,etc
   .Display

问题在于,创建的新消息丢失了所有HTML格式,即我从正在复制信息的消息(以及各种字体样式)。我尝试将新消息的正文格式设置为HTML(参见上面的代码),但这并没有成功。目前,新消息包含所有文本数据,但不是表格,而是每个单元格的数据以制表符分隔,整个邮件正文使用相同的字体。

1 个答案:

答案 0 :(得分:0)

BodyFormat的行为与预期不符。相反,HTMLBody可以如下使用,以HTML格式正确显示正文:

使用newMsg    .HTMLBody = newBody    '...设置主题等    。显示