「Web上にその要素が存在するかどうか」をVBAで判定するときには、どう書いたらいいのですか？

Question

###前提・実現したいこと

Webページに明細のtableがあって（1行から最大でも50行）
そこの項目をExcelに持ってくる
ということがしたいです。

明細行は何行あるかはわかりません。改ページはありません。（もし50行あったら同じページにだーっと50行並びます）
明細行の要素のidは
datalist[0].item
datalist[1].item
datalist[2].item
…(中略)…
datalist[49].item

という感じの命名になっているっぽいです。

###発生している問題・エラーメッセージ

「まず要素が存在するかどうかを判定して、あったら項目を持ってくる、なければFor～Nextを抜ける」
という感じを考えました。
JavaScriptだと、存在しない要素はNullが返るので、ExcelVBAでも同じかなーと思って……
こんな感じで書いてみたのですが

For i = 0 To 49
    If IsNull(objIE.document.getElementById("dataList[" & CStr(i) & "].item").Value) Then
        Exit For
    Else
        ' 要素があったときの処理
    End If
Next i

IsNullのところで、実行時エラー424（指定したオブジェクトが無いときに出る）で止まってしまいます。
IsNullのところをIsErrorにしたらTrueが返るかなーと思ったんですが、やっぱり424で止まります……。

On Error GoTo でエラー処理に飛ばして……だと、そのあとこの場所に戻ってくるやり方がわかりません。

###補足情報(言語/FW/ツール等のバージョンなど)
Excel2016、Windows10、IE11です。

Answer 1

(1).Valueをつけない(オブジェクトがないなら値はとれない)
(2)オブジェクトがNullかどうかは 「is Nothing」で判断。

これでどうでしょうか?
↓
If (objIE.document.getElementById("dataList[" & CStr(i) & "].item")
is Nothing) Then ～

Comments

[sumire_cl]

そっか！そりゃそうですね！オブジェクトが無いなら当然valueは無いですね！
valueを抜いて判定したら、ちゃんと判定してもらえました。
ありがとうございました！

で
NothingとNullって何が違うのかしら
と思ってググったら
http://www.moug.net/tech/acvba/0050010.html
Nullは「有効なデータが格納されていない」「Nullはバリアント型」「フィールドに有効な値がない場合や、バインドしていない（非連結）コントロールの場合、初期値はEmptyでなくNull」これはAccessなのでちょっと違うかもしれませんが
Nothingは「オブジェクト変数が特定のオブジェクトと関係付けられていない」
ということで
「そもそもそのオブジェクトが存在するのかどうか」という場合は、Nothingのほうが道理に合う感じがしました。

Answer 2

自分は↓のようにします。
クリアする際の値・その後の判定は、適宜調整してください。

Dim Val As Variant
Val = Empty 'クリア
On Error Resume Next
Val = objIE.document.getElementById("dataList[" & CStr(i) & "].item").Value
On Error GoTo 0
If IsEmpt(Val) = False Then
   (処理)
End If

何度も似たような処理が必要なら、
共通関数化して使いまわすのがベターですね。