如何从特定类中获取特定的 InnerText? [英] How to get a particular InnerText from a specific class?

问题描述

<tbody>
            <tr>
                <td>
                    <a href="/denmark/1st-division/">1st Division 2016/2017</a>
                </td>
                    <td>
                    </td>
            </tr>
            <tr class="even">
                <td>
                    <a href="/denmark/1st-division-2015-2016/">Bet25 Liga 2015/2016</a>
                </td>
                    <td>

大家好！我想从该源代码中获得:Bet25 Liga 2015/2016.

Hi guys! I would like to get this: Bet25 Liga 2015/2016 from that source code.

Sub ExtractHrefClass()

    With CreateObject("MSXML2.XMLHTTP")
        .Open "GET", Range("D8").Value, False
        .Send
        Range("E8").Value = Split(Split(Split(.ResponseText, "<tr class=""even"">", 2)(1), "<a href=""", 2)(1), """", 2)(0)
    End With

End Sub

一个朋友给了我这个宏，它允许我提取那个 "even" 类的 href，但我需要有 InnerText 也是.我必须在哪里更改代码?谢谢:)

A friend gave me this macro that allows me to extract the href of that "even" class, but i need to have the InnerText too. where i have to change the code? Thanks :)

推荐答案

试试下面的代码:

Sub ExtractHrefClass()

    With CreateObject("MSXML2.XMLHTTP")
        .Open "GET", Range("D8").Value, False
        .Send
        a = Split(Split(Split(.ResponseText, "<tr class=""even"">", 2)(1), "<a href=""", 2)(1), """>", 2)
    End With
    Range("E8").Value = a(0)
    Range("F8").Value = Split(a(1), "<", 2)(0)

End Sub

这篇关于如何从特定类中获取特定的 InnerText?的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！