使用 VBA 将 HTML 粘贴到 Word 中

Pasting HTML into Word using VBA

我需要将 6000 HTML 个字符串粘贴到使用 VBA 格式化的 Word 中。如果我插入一个 HTML 文件,我可以这样做,但我宁愿通过传递一个字符串来做到这一点。
这是示例 HTML 我正在使用:

<html><body>normal <b>bold</b><br></body></html>

我可以让它工作:

Selection.InsertFile FileName:="html test file.htm"

结果:正常粗体(这就是我想要的)。

但不是这个(剪贴板中有上面的HTML):

ActiveDocument.Range.PasteSpecial ,,,,WdPasteDataType.wdPasteHTML

对于后者,我收到错误 5342“指定的数据类型不可用”。

代码 post 由 GMCB 编辑(接受的答案)在这里将根据一些简短的测试做你想做的事:

post 的主要重点是将 RTF 格式的文本放入剪贴板,但它也涉及填充 HTML 格式。