从电子邮件正文中提取电子邮件地址答案

【问题标题】：Extract an email address from the body of an email从电子邮件正文中提取电子邮件地址
【发布时间】：2016-04-12 08:49:21
【问题描述】：

我正在尝试自动回复我们从网络主机收到的电子邮件。

电子邮件包含发送回复的地址。

如何从电子邮件正文中提取电子邮件地址，并将其插入新电子邮件的 TO 中？

【问题讨论】：

【解决方案1】：

Outlook 对象模型提供了三种处理项目主体的主要方式：

Body - 表示 Outlook 项目的明文正文的字符串。
HTMLBody - 表示指定项的 HTML 正文的字符串。
Word editor - 正在显示的消息的 Microsoft Word 文档对象模型。 Inspector 类的 WordEditor 属性从 Word 对象模型返回 Document 类的一个实例，您可以使用它来设置消息正文。

您可以在Chapter 17: Working with Item Bodies 中阅读有关所有这些方式的更多信息。由您决定选择哪种方式来处理消息正文。

要在 Outlook 中设置 TO 字段，您可以使用 the corresponding property 或使用 Recipients 集合。以下代码行使用Add 方法将“Dan Wilson”添加为收件人：

 Dim myRecipient As Outlook.Recipient 
 Set myRecipient = mailItem.Recipients.Add("Dan Wilson")

最后，您可能会发现Getting Started with VBA in Outlook 2010 文章很有帮助。

【讨论】：