如果href值的前10个字符=

Question

我正在努力解决问题。在Excel VBA中，如果href值的前几个字符等于给定值，我需要单击超链接。考虑下面的字符串：

<li><a href="/Column/1234567/general-info/Weekly/Monday/">Detail

所以，在这个例子中，我基本上只想在href = "/Column/1234567"和innertext = "Detail"的前15个字符的值时唤起点击。还有其他href以"/Column/1234567"开头，但不是＆＃34;细节＆＃34;还有其他的innertexts是Detail但具有不同的起始href值。如果满足2个条件，我只想点击。有人可以帮助使用VBA代码吗？

Answer 1

我找到了解决问题的方法。将字符串变量myRef的值设置为我想要匹配的前15个字符后，这是有效的代码：

    Set DetailLinks = ie.Document.getElementsByTagName("a")
    For Each Hyperlink In DetailLinks
        If InStr(Hyperlink.href, myRef) And InStr(Hyperlink.innerText, "Detail") Then
            Hyperlink.Click
            Exit For
        End If
    Next

@findwindow，感谢您提供的帮助。