为了账号安全,请及时绑定邮箱和手机立即绑定

带有标签的HTML文本,用于在Excel单元格中格式化文本

带有标签的HTML文本,用于在Excel单元格中格式化文本

慕的地8271018 2019-09-24 16:18:23
有没有办法采用HTML并将其导入到excel中,以便将其格式化为富文本格式(最好使用VBA)?基本上,当我粘贴到Excel单元格时,我希望将其更改为:<html><p>This is a test. Will this text be <b>bold</b> or <i>italic</i></p></html>到这个:这是一个测验。该文字是粗体还是斜体
查看完整描述

3 回答

?
收到一只叮咚

TA贡献1821条经验 获得超4个赞

是的,这是可能的:)实际上,让Internet Explorer为您完成肮脏的工作;)


经过测试


我的假设


我假设html文本在Sheet1的单元格A1中。您也可以改用变量。

如果您的列中充满了html值,则只需将以下代码放入循环中


Sub Sample()

    Dim Ie As Object


    Set Ie = CreateObject("InternetExplorer.Application")


    With Ie

        .Visible = False


        .Navigate "about:blank"


        .document.body.InnerHTML = Sheets("Sheet1").Range("A1").Value


        .document.body.createtextrange.execCommand "Copy"

        ActiveSheet.Paste Destination:=Sheets("Sheet1").Range("A1")


        .Quit

    End With

End Sub

快照

//img1.sycdn.imooc.com//5d89d16b000158bd12720166.jpg

查看完整回答
反对 回复 2019-09-24
  • 3 回答
  • 0 关注
  • 1411 浏览
慕课专栏
更多

添加回答

举报

0/150
提交
取消
意见反馈 帮助中心 APP下载
官方微信