这是我的代码的一部分,它工作正常:
Dim objOutlook As New Outlook.Application
Dim objMail As MailItem
Dim Header as String
Dim Text As String
Dim EmailAddr as String
Set objOutlook = New Outlook.Application
Set objMail = objOutlook.CreateItem(olMailItem)
I then define Header, text and EmailAddr
With objMail
.To = EmailAddr
.Subject = Header
.Body = Text
.Send
End with
我想将文本格式化为 Arial 12pt。
我要插入什么来实现这一点?
在使用您的建议时,我首先收到一封没有测试文本和字体 Calibri 的电子邮件。如果我尝试发送它,我会收到一条错误消息。在保存时,我发现草稿中也有您预测的电子邮件版本 - 正确的字体和文本。我怎样才能摆脱第一封电子邮件?还有关于更改为粗体和斜体的任何提示吗?只是编写一个普通的 html 文档并将其放入编码中吗?