在 Outlook 电子邮件中编辑表格文本

Question

我希望能够在使用 Excel VBA 嵌入到表格中的电子邮件中查找和替换文本。我已经知道如何打开现有的 Outlook 电子邮件。从论坛中，我了解到以下代码仅适用于文本，但不适用于嵌入到电子邮件中的表格中。

有没有办法使用书签？我所做的任何尝试都不会影响电子邮件正文或删除所有格式。

With OutMail
    .To = UserForm1.TextBox4.Text
    .CC = ""
    .BCC = ""
    .Subject = "This is my Subject line"
    .HTMLBody = Replace(.HTMLBody, "<First Name>", UserForm1.TextBox5.Text)
    .HTMLBody = Replace(.HTMLBody, "<Last Name>", UserForm1.TextBox6.Text)
    .Display
End With

Answer 1

Outlook 使用 Word 作为电子邮件编辑器。您可以使用 Word 对象模型来完成工作。 Inspector 类的WordEditor 属性返回代表消息正文的Word 文档实例。

您可以在Chapter 17: Working with Item Bodies 中阅读有关使用项目主体的所有可能方式的更多信息。