從單元格中提取數據的一部分使用vba

我已經在Excel中的單元格中加載了html字符串，我想要做的是從字符串中提取url，但是丟失了其餘的html標記。從單元格中提取數據的一部分使用vba

字符串我有這個樣子

   <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來做到這一點，但我得到很快卡住了，有人能指出我朝着正確的方向。感謝

來源

2012-12-21 sam

你也可以用一個公式做到這一點（E3將是你的源小區）。此公式預計所有的href屬性都由雙引號分隔。

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

來源

2012-12-21 12:32:35 Tahbaza

您可以與拆分功能發揮：

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

來源

2012-12-21 12:28:55 Pragmateek

從單元格中提取數據的一部分使用vba

回答

相關問題