我想創(chuàng)建一個簡單的腳本來創(chuàng)建一個HTML消息，并且我想保留盡可能多的默認(rèn)值。當(dāng)創(chuàng)建一個新的HTML電子郵件時保持默認(rèn)的Outlook格式

在我的情況下，當(dāng)我使用Home創(chuàng)建一個新郵件->新郵件時，它總是會創(chuàng)建一個默認(rèn)字體[Calibri 11']，格式文本Html和簽名的郵件。

如果我使用功能Application.CreateItem(olMailItem)它創(chuàng)建郵件沒有問題。

但是，只要我聲明一個帶有.HTMLBody的html主體，它將覆蓋格式：font [Times New Roman 12']，也沒有簽名。

更奇怪的：如果我用網(wǎng)上發(fā)現(xiàn)，以保持簽名“特技”(見代碼波紋管)，則字體會再改寫為[宋體10' (一個點波紋管默認(rèn))

任何建議/解釋？

簡單的腳本來創(chuàng)建一個HTML電子郵件(字體的變化+無簽字)：

Sub TestMessage1()

Dim objMsg As MailItem

Set objMsg = Application.CreateItem(olMailItem)

With objMsg

.To = "[email?protected]"

.Subject = "test Mail"

.HTMLBody = "

Hello,
Could you please review this program
Regards,

"

.Display

End With

End Sub

寫HTML郵件有簽名(不同字體的變化)：

Sub TestMessage2()

Dim objMsg As MailItem

Set objMsg = Application.CreateItem(olMailItem)

With objMsg

.To = "[email?protected]"

.Subject = "test Mail"

.Display

.HTMLBody = "

Hello,
Could you please review this program
Regards,

" & objMsg.HTMLBody

End With

End Sub

2017-05-09

Jonathan

總結(jié)

以上是生活随笔為你收集整理的outlook自动保存html,当创建一个新的HTML电子邮件时保持默认的Outlook格式的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。