2016-06-22 5 views
0

現在、VBAを使用しているWebサイトからデータをスクラップしようとしています。私はthisチュートリアルを、以下の午前ので、私のコードは、次のいずれかです。VBA:ドキュメントオブジェクトモデルのデータを処理する

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ページをスクラップする正しい方法を選択する方法についての説明を私に提供することができますか?

答えて

2

問題を解決する以下の変更をお試しください。要するに、allRowofDataをコレクションとして扱う必要があります。

myValue = allRowOfData(0).Cells(1).innerHTML 
関連する問題