我有一个 Excel 工作表,其中的单元格包含 html。如何批量将它们转换为明文?目前有很多无用的标签和样式。我想从头开始写它,但如果我能得到纯文本,那就容易多了。
我可以编写一个脚本将 html 转换为 PHP 中的纯文本,所以如果您想不出 VBA 中的解决方案,那么也许您可以建议我如何将单元格数据传递到网站并检索数据。
设置对“Microsoft HTML 对象库”的引用。
Function HtmlToText(sHTML) As String
Dim oDoc As HTMLDocument
Set oDoc = New HTMLDocument
oDoc.body.innerHTML = sHTML
HtmlToText = oDoc.body.innerText
End Function
Tim
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)