如何修改Excel VBA生成的HTML邮件中的文本颜色？

问题出在你使用了自定义的<sig>标签，Outlook的HTML渲染引擎基于Word，对非标准HTML标签支持极差，会直接忽略这类标签上的样式设置，导致颜色无法生效。而W3Schools的测试环境是标准浏览器，能正常解析自定义标签，所以测试结果和Outlook里的表现不一致。

修改方案：将自定义<sig>标签替换为标准的<div>或<p>标签，保留原内联样式即可。修改后的代码如下：

Sub Send_Email_Main_TEST()

    Dim OutApp As Object
    Dim OutMail

    Set OutApp = CreateObject("Outlook.Application")
    Set OutMail = OutApp.CreateItem(0)
    
    On Error Resume Next
    With OutMail
        .Subject = "TEST"
        .HTMLBody = "<div style='font-size:10.0pt;color:blue;'><b>NAME | TITLE | DEPT | COMPANY</b><br>Tel Int: | Tel Ext: | Email: </div>"
        .Display
    End With
    On Error GoTo 0
    
    Set OutMail = Nothing
    Set OutApp = Nothing
    
End Sub

额外注意事项：

• Outlook对现代HTML/CSS特性支持有限，尽量使用基础HTML标签和内联样式，避免依赖复杂选择器或非标准属性
• 如果后续需要添加Outlook默认签名，不要直接覆盖.HTMLBody，建议先获取默认签名的HTML内容再拼接，防止样式冲突

内容的提问来源于stack exchange，提问作者DMcLaren