Outlook VBA将文本格式设置为HTML,然后选择一个快捷的部分

问题描述 投票:0回答:1

我对VBA的前景一无所知。我希望可以记录宏,但是我发现这是不可能的。

所以,我每天要收到近100封以纯文本格式发送的电子邮件,而我始终需要转换为HTML,以便选择Quick Parts,然后发送电子邮件。

可以通过VBA自动执行吗?

html vba outlook outlook-vba
1个回答
0
投票

MailItem.BodyFormat属性允许设置指示正文文本格式的OlBodyFormat常数。例如:

Sub CreateHTMLMail() 

 'Creates a new email item and modifies its properties. 

 Dim objMail As MailItem 



 'Create mail item 

 Set objMail = Application.CreateItem(olMailItem) 

 With objMail 

 'Set body format to HTML 

 .BodyFormat = olFormatHTML 

 .HTMLBody = "<HTML><H2>The body of this message will appear in HTML.</H2><BODY>Type the message text here. </BODY></HTML>" 

 .Display 

 End With 

End Sub

要处理传入的电子邮件,您可以使用Application类的NewMailEx事件。当有新消息到达收件箱时以及在发生客户端规则处理之前,将触发NewMailEx事件。您可以使用EntryIDCollection数组中返回的Entry ID来调用NameSpace.GetItemFromID方法并处理该项目。

© www.soinside.com 2019 - 2024. All rights reserved.