在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中了解有关使用项目正文的所有可能方式的更多信息。