html文本框excel,HTML文本,带有在Excel单元格中格式化文本的标签

是的可能:)事实上，让Internet Explorer做你的脏工作;)

TRIED和TESTED

我的假设

>我假设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

SNAPSHOT

HTH

Sid