Excel文本框格式的文本到Htmlbody转换

我需要从Excel文本框与HTMLBODY发送文本。 所以当我把它发送

.HTMLBody = ThisWorkbook.Worksheets("info").Shapes("TextBox 1").TextFrame2.TextRange.Characters.Text 

电子邮件没有格式化。

那么如何将文本框转换为Html源代码呢？ 或者如何从html文件获取数据到.HTMLBody ？

Answer 1

Ron de Bruin的网站在发送HTML邮件方面有一些很棒的内容。 在此页面上查看RangetoHTML函数。