Question

我在excel的单元格中加载了一些html字符串，我想要做的是从字符串中提取url但是丢失其余的html标记。

我看起来像这样的字符串

                <a class="text" href="http://cssrockstar.com" target="_blank" rel="nofollow" onclick="_gaq.push(['_trackPageview', '/view/CSS Rockstar']);">CSS Rockstar</a>

我需要提取的是http://cssrockstar.com部分

我试图用一些vba来做这个但是我很快就被卡住了，有人能指出我正确的方向。感谢

Answer 1

您也可以使用公式（E3将是您的源单元格）执行此操作。此公式要求所有href属性都用双引号分隔。

=LEFT(MID(E3, FIND("href=""",E3)+6, 999),FIND("""",MID(E3, FIND("href=""",E3)+6, 999))-1)

Answer 2

您可以使用拆分功能：

Sub test()
    Dim s As String
    s = "<a class=""text"" href=""http://cssrockstar.com"" target=""_blank"" rel=""nofollow"" onclick=""_gaq.push(['_trackPageview', '/view/CSS Rockstar']);"">CSS Rockstar</a>"

    Dim res As String
    res = Split(Split(Split(s, "href=")(1), " ")(0), """")(1)
End Sub

使用vba从单元格中提取部分数据

2 个答案: