在 Outlook 2010 中使用模板回复答案

【问题标题】：reply with template in outlook 2010在 Outlook 2010 中使用模板回复
【发布时间】：2020-06-25 15:46:46
【问题描述】：

作为改进我们帮助台客户服务的持续过程，我希望在 Outlook 中集成一项功能，以便我们可以使用 Outlook 模板 (.oft) 回复现有电子邮件。

我的在线搜索主要给了我自动回复的结果。然而，这不是我（我们）需要的。

我们需要一种工具，使我们能够从标准模板列表中进行选择（带有面向主题的回复）。 http://replywith.4team.biz/ 提供了一个正确方向的解决方案，但是，与任何公司一样，我们想要一个免费工具。

这可以在 VBA 中编程吗？如果有，怎么做？

【问题讨论】：

标签： vba outlook outlook-2010

【解决方案1】：

我们的不是去推理，而是去做和去死。

这是一个基于http://msdn.microsoft.com/en-us/library/office/ff865637.aspx 的小型、未经测试的 VBA 示例

Sub CreateReplyFromTemplate() 

dim currItem  As Outlook.MailItem 
dim currItemReply  As Outlook.MailItem 
Dim MyItem As Outlook.MailItem 

set currItem = activeinspector.currentitem
Set curritemReply = currItem.Reply
Set MyItem = Application.CreateItemFromTemplate("C:\HelpTopic1.oft") 

MyItem.To = currItemReply.To
MyItem.htmlbody = MyItem.htmlbody  & currItemReply.htmlbody

currItemReply.close oldiscard
currItem.close  oldiscard

MyItem.Display 

set curritemReply = nothing
set MyItem = nothing
set currItem = nothing
End Sub

有关部署 VbaProject.OTM 文件的方法http://www.outlookcode.com/article.aspx?id=28 或看看这是否有效VbaProject.OTM deployment

或者，免费版本内置在 Outlook 中。

通过快速步骤回复消息模板 - http://www.msoutlook.info/question/665

使用消息模板 - http://www.howto-outlook.com/howto/messagetemplates.htm

如果有这方面的培训，每人一天的培训费用可能是 300.00 美元或更多。

【讨论】：

【解决方案2】：

当然你可以在 VBA 中做到这一点，但你真的想要吗？您可以花 99.50 美元购买该工具的 10 个许可证。我不知道你在哪里工作，但在大多数软件公司中，99.50 美元可以为你购买大约一小时的程序员时间（包括福利）。如果您节省了发布此问题所花费的时间，您可能已经购买了 1 个许可证。

【讨论】：

德米特里，谢谢您的回复。我们将在 +- 50 个前景客户上需要此功能，因此成本约为 397.50 美元。根据编写代码的难易程度，此时购买许可证并不合适。
如果我要编写这样的实用程序，我估计至少需要几天时间才能准备好进行测试。有很多事情要做：创建一个 COM 插件，让它为每个回复创建 Outlook 功能区按钮，以及一个用于管理用于创建和编辑模板的 UI 的按钮。你哪部分有问题？与几天的开发和测试相比，397.50 美元仍然很划算。

【解决方案3】：

只是添加到上面的答案，在子 CreateReplyFromTemplate() 而不是

Set curritemReply = currItem.Reply

替换为

Set currItem = Application.ActiveExplorer().Selection(1)

【讨论】：