2

私は、実際の値と交換するための HTML フォーマットとプレースホルダーを持つ電子メール テンプレートを持っています。

Excel では、Outlook の CreateItemFromTemplate メソッドを使用して電子メールを読み込みます。この時点で保存すると、メールの書式が保持されます。

本文で置換を実行すると、ほとんどの書式設定が取り除かれます。

Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItemFromTemplate("template.oft") ' <- has lots of html formatting

With OutMail
    .Body = Replace(.Body, "#recipient#", "Some other value") ' <- Strips out most formatting!!
    .Save ' <- this works fine without the line above.
End With
4

1 に答える 1

5

この投稿のおかげで: https://stackoverflow.com/a/8473313/569662

私の問題は、次.HTMLBodyの代わりに使用する必要があることでした.Body:

.HTMLBody = Replace(.HTMLBody, "#recipient#", "Some other value")
于 2012-08-29T15:25:12.853 に答える