如何在Excel VBA中对自动电子邮件正文加粗或彩色文本

我正在发送链接到Excel数据的邮件。 我需要大胆和红色只有几个字,我正在努力,我无法做到这一点。 希望来自这里的人能帮助我。 细胞(我,13)必须得到大胆和红色,当我发送。

toList = Cells(i,4)'从col D获取收件人

eSubject = "Request for KBR transport to " & Cells(i, 2) & " on " & Format(Cells(i, 3), "dd-mmm-yy") eBody = "Dear " & Cells(i, 1) & vbCrLf & vbCrLf & "Can you please arrange KBR Transport for below PASSENGERS." & vbNewLine & vbNewLine & _ " " & Cells(i, 13) & vbNewLine & vbNewLine & _ " " & vbNewLine & vbNewLine & _ "Full Name : " & Cells(i, 6) & vbNewLine & vbNewLine & _ "Nationality : " & Cells(i, 7) & vbNewLine & vbNewLine & _ "Departure/Arrival Date : " & "" & Format(Cells(i, 8), "dd-mmm-yy") & vbNewLine & vbNewLine & _ "Airline : " & Cells(i, 9) & vbNewLine & vbNewLine & _ "Flight Number : " & Cells(i, 10) & vbNewLine & vbNewLine & _ "Departure/Arrival Time : " & Cells(i, 11) & vbNewLine & vbNewLine & _ "Escort required: " & Cells(i, 14) & vbNewLine & vbNewLine & _ " " & vbNewLine & vbNewLine & _ " Contact Number: " & Cells(i, 12) & vbNewLine & vbNewLine & _ " " & vbNewLine & vbNewLine & _ "Please confirm pick up time and availability." & vbNewLine & vbNewLine ## 

使用HTML正文,那么你可以使用HTML <b><font>标签。 这可能更适合,因为您也可以使用HTML <table>来显示数据。