ＶＢＡ ACCESS2010から、ACCESS2016 IE11に変更したらエラーが出るようになりました。

Question

前提・実現したいこと

ここに質問の内容を詳しく書いてください。
（例）ACCESS2010から、ACCESS2016 IE11に変更したらエラーが出るようになりました。
動くようにするにはどうすればいいでしょうか？

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

エラーメッセージ
実行時エラー　’13’
型が一致しません。

該当のソースコード

ACCESS VBA

ソースコード(一部抜粋）

Dim objIE As InternetExplorer
Dim HtmlTagBody As HTMLElementCollection

For Each HtmlTagBody In objIE.Document.body.all()　（ここでエラーがでる）

試したこと

補足情報（FW/ツールのバージョンなど）

ACCESSのVBAを組んで、スクレイピングをしていたのですが、ACCESS2016 IE11に変更したら
「実行時エラー　’13’　型が一致しません。」というエラーが出るようになりました。
動くようにするにはどうすればいいでしょうか？
宜しくお願いします。

環境：Windows10 HOME

Answer 1

IE11 にしたから、.NET Frameworkのバージョンも一緒に上がったせいで、エラーになっているんじゃないでしょうか。
取り敢えず、HTMLElementCollectionをObjectに変更してみてはどうでしょうか。

Comments

[koto]

sazi さん、早速の回答ありがとうございます。
sazi　さんのアドバイスの通り変更したところ、当該のプロシージャはエラーなしで実行されました。
ありがとうございます。
しかしながら、続く別のプロシージャで

エラーメッセージ
実行時エラー　’424’
オブジェクトが必要です。

というエラーが出ます。

ソースコード(一部抜粋）
Dim tmpInnertxt1, tmpInnertxt2 As String

For i = 0 To HtmlTagTable.rows.length - 1
'見出し
tmpInnertxt1 = HtmlTagTable.rows(i).cells(0).innerText
'データ
tmpInnertxt2 = HtmlTagTable.rows(i).cells(2).innerText　（ここでエラー）

補足情報（FW/ツールのバージョンなど）
このVBAはいくつかのプロシージャで動作しています。

聞きたいこと
１．どのようにすればいいでしょうか？
２．.NET Frameworkのバージョンが上がったのが原因のようですが、
どういうキーワードで探せば、参考になりそうな情報にたどりつけますか？

よろしくお願いします。

[sazi]

エラーについては.cells(2)のデータが無いのでしょう。
https://vba-code.net/ie/runtime-error424/
全体的な話であれば、「vba IE html dom」などのキーワードで、局所的なことであれば「VBA IE メソッド名など」みたいな感じで。
以下はmicrosoftのDOMに関するリファレンスです。
https://msdn.microsoft.com/ja-jp/library/ms171711(v=vs.110).aspx

[koto]

sazi さん、回答ありがとうございます。
.cells(2)の個所を.cells(1)に変更したところ、無事動きました。
ご教授ありがとうございました。