Question

我目前正在尝试使用VBA从网站中删除数据。我正在关注this教程，因此我的代码如下：

Sub Foo()

    Dim appIE As Object
    Set appIE = CreateObject("internetexplorer.application")

    With appIE
        .Navigate "https://www.ishares.com/it/investitore-privato/it/prodotti/251843/ishares-euro-high-yield-corporate-bond-ucits-etf"
        .Visible = True
    End With

    Do While appIE.Busy
        DoEvents
    Loop

    Set allRowOfData = appIE.document.getElementsByClassName("visible-data totalNetAssets")
    Dim myValue As String
    myValue = allRowOfData.Cells(1).innerHTML
    MsgBox myValue

End Sub

不幸的是，我想废弃的数据与示例中使用的数据之间存在一些差异：此行

myValue = allRowOfData.Cells(1).innerHTML

根据VBA调试，

是错误的。

任何人都可以向我提供一些解释，说明为什么它不起作用以及我应该如何选择正确的方法来废弃HTML页面？

Answer 1

尝试以下更改，以解决您的问题。简而言之，您需要将allRowofData视为集合。

myValue = allRowOfData(0).Cells(1).innerHTML

VBA：处理文档对象模型中的数据

1 个答案: