Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/23.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vba 从网站表中提取一个图形_Vba_Excel - Fatal编程技术网

Vba 从网站表中提取一个图形

Vba 从网站表中提取一个图形,vba,excel,Vba,Excel,我目前正在尝试使用VBA来刮取某个网站上特定表格中的特定数字。下面是我的浏览器中“检查元素”面板中围绕它的HTML代码 <tr class="cmeRowBandingOff cmeTableRowHighlight"> <th scope="row">MAR 15</th> <td>2056.50</td> <td>2062.50</td> <

我目前正在尝试使用VBA来刮取某个网站上特定表格中的特定数字。下面是我的浏览器中“检查元素”面板中围绕它的HTML代码

<tr class="cmeRowBandingOff cmeTableRowHighlight">
        <th scope="row">MAR 15</th>
        <td>2056.50</td>
        <td>2062.50</td>
        <td>2042.25</td>
        <td>2043.25</td>
        <td><span>-12.50</span></td>
        <td>2044.00</td>
        <td class="cmeTableRight">1,351,989</td>
        <td class="cmeTableRight">2,701,326</td>
    </tr>
我知道我需要改变这一点:

dd = IE.Document.getElementsByClassName("cmeRowBandingOff")(0).innerText
但是我不确定该怎么做。
有人能帮我修改VBA代码,让我自己得到2044.00的结果吗?

类似于:

Dim rw, dd

Set rw = IE.Document.getElementsByClassName("cmeRowBandingOff")(0)

dd = rw.getElementsByTagName("td")(5).innerText
'or
dd = rw.childNodes(6).innerText
'or
dd = rw.Cells(6).innerText
Dim rw, dd

Set rw = IE.Document.getElementsByClassName("cmeRowBandingOff")(0)

dd = rw.getElementsByTagName("td")(5).innerText
'or
dd = rw.childNodes(6).innerText
'or
dd = rw.Cells(6).innerText