使用VBA或Ad-in for Outlook 2010复制受邮件约束的新电子邮件

Question

使用VBA或加载项或不同的自动方法我想执行以下操作：

当我创建新电子邮件时，在发送之前，我想复制电子邮件的主题并将其粘贴到短信的开头。 发送电子邮件后，收件人将像以前一样在主题框中看到主题，并且还会在邮件顶部看到它。

例如：

在：

主题：新时间表

消息： 星期一，星期三，星期五

应用宏或其他自动方法后：

主题：新时间表

消息：

新计划

周一，周三，周五

如果可能，任何示例？

Answer 1

您可以处理Application类的ItemSend事件，您可以在其中修改邮件正文。只要用户通过Inspector（在检查器关闭之前，但在用户单击“发送”按钮之后）或者使用Outlook项目的Send方法（如MailItem）发送Microsoft Outlook项目时，就会触发它在一个程序中。

Outlook对象模型提供了三种使用项主体的主要方法：

1. Body。
2. HTMLBody。
3. Word编辑器。 Inspector类的WordEditor属性返回表示邮件正文的Word文档实例。因此，您可以使用Word对象模型对邮件正文执行任何操作。

有关详细信息，请参阅Chapter 17: Working with Item Bodies。