我有一个电子邮件模板,它具有 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
最佳答案
感谢这篇文章:https://stackoverflow.com/a/8473313/569662
我的问题是你必须使用 .HTMLBody
而不是 .Body
:
.HTMLBody = Replace(.HTMLBody, "#recipient#", "Some other value")
关于vba - Body.Replace 去除 html 格式,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/12181201/