Outlook自定义表单 - 在发送事件上编辑邮件

时间:2012-02-09 18:11:34

标签: vba outlook

我已修改Outlook消息表单以包含自定义下拉列表。我需要在用户发送时将下拉列表中的选定值附加到消息文本的开头和结尾。我该怎么做?

示例:用户从ddl中选择“优先级1”并发送消息“这是一条消息”。我希望收件人看到“优先级1这是一条消息。优先级1”谢谢!

1 个答案:

答案 0 :(得分:0)

如何通过您使用的表单的发送功能发送消息,或者您是通过代码发送表单我会建议通过代码发送表单这是因为您可以更好地控制正在发送的消息的功能。

将此与Outlook和系统变量相结合,您可以返回大量相关且有用的数据。

Set DropBox = objPage.Controls("DropBoxName")

With oOMail
.To = "mail@adressee.com.au"
.Subject =  DropBox.Text && "Subject"
.Body =  "message" && DropBox.Text && vbCrLf 
.Send
End With