使用vba从单元格中提取部分数据
我在Excel中的单元格中有一个负载的HTMLstring，我想要做的是从string中提取url，但失去了其余的HTML标记。
我有这样的string
<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来做到这一点，但我很快卡住了，有人能指出我在正确的方向。 谢谢
你也可以用公式来做到这一点（E3将是你的源单元格）。 这个公式期望所有的href属性由双引号分隔。
=LEFT(MID(E3, FIND("href=""",E3)+6, 999),FIND("""",MID(E3, FIND("href=""",E3)+6, 999))-1)
你可以玩分裂function：
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