Question

我正在寻找一种解决方案，其中一群人可以使用位于共享文件夹中的模板来回复电子邮件。我似乎无法弄清楚的一件事是使用此模板回复电子邮件，同时仍然保留电子邮件跟踪/线程。由于管理要求，无法附加电子邮件。任何人对如何处理这个有任何建议吗？

建议的一个选项是使用电子邮件签名功能并将模板放在那里，但这是最后的手段，因为它很难维护和更新。

Answer 1

尝试这样的事情。

Private Sub ReplyToWithTemplate()

Dim currItem As Object
Dim myitem As Outlook.MailItem

Set currItem = ActiveInspector.currentItem

If TypeOf currItem Is MailItem Then
    Set myitem = Application.CreateItemFromTemplate("H:\test\test.oft")
    myitem.To = currItem.Reply.To
    myitem.HTMLBody = myitem.HTMLBody & currItem.HTMLBody
    'myitem.body = myitem.body & currItem.body
    myitem.Display
End If

Set myitem = Nothing
Set currItem = Nothing

End Sub

在保持电子邮件跟踪的同时回复模板

1 个答案: