使用Outlook 2010更改对另一个地址的回复

时间:2012-10-07 08:48:11

标签: outlook-vba outlook-2010

我正在尝试创建Outlook 2010 VBA代码以回复\全部回复特定的电子邮件地址。

1 个答案:

答案 0 :(得分:1)

我不是Visual Basic程序员,但我将下面的宏代码一起攻击,因为我无法在任何地方找到它。我花了很长时间才弄清楚自己;这可能不是最好的做法,但它对我有用。

要安装它: 转到Outlook中的宏,键入宏名称,然后按“创建”。我称之为“ChangeReplyAddrNoPrompt”。然后粘贴下面的代码(工作代码是Sub()和End Sub之间的行。然后保存并关闭VBA。

然后打开一条新消息,单击自定义快速访问菜单,然后单击更多命令。从“从以下选择命令”下拉菜单中选择“宏”。将刚刚创建的宏添加到快速访问工具栏。

祝你好运!

Sub ChangeReplyAddrNoPrompt()
Dim mail As MailItem
Set mail = ActiveInspector.CurrentItem

mail.ReplyRecipients.Add ("email1@website.url")
mail.ReplyRecipients.Add ("email2@website.url")
mail.Recipients.ResolveAll

End Sub