在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中閱讀更多關於使用物品主體的所有可能方式。