VBA 將電子郵件地址添加到正文 (Outlook)

Question

我希望你能幫助我解決我的問題。 我對 VBA 相當缺乏經驗。 我寫了一個宏來打開一個 email。 email 中應該有文字。 我想存儲一個電子郵件地址以供查詢。 是否可以將此電子郵件存儲為鏈接？ 例如：

Dim MyMessage As Object
Dim OutlookApplication As Object

Set OutlookApplication = CreateObject("Outlook.Application")
Set MyMessage = OutlookApplication.createitem(0)
With MyMessage
    .to = ....
    .Subject = "Test"
    .htmlbody = "Click me <a href=mailto:me@test.com>Click</a>"

不幸的是，這不起作用

Answer 1

在設置 HTML 內容之前，嘗試設置MailItem.BodyFormat屬性，該屬性返回或設置指示正文文本格式的OlBodyFormat常量。 請注意， HTMLBody屬性返回或設置一個字符串，該字符串表示指定項的 HTML 正文。 嘗試使用格式良好的 HTML 文檔，而不僅僅是錨標記。

正文文本格式決定了用於顯示消息文本的標准。 Microsoft Outlook 提供三種正文文本格式選項：純文本、富文本 (RTF) 和 HTML。 當BodyFormat屬性從 RTF 切換到 HTML 時，所有文本格式都將丟失，反之亦然。