###前提・実現したいこと
検索がヒットしなかった場合に次の処理に移るようにしたい。
###発生している問題・エラーメッセージ
エラーメッセージは出ません。
オブジェクトはこのプロパティまたはメソッドをサポートしていません。
###該当のソースコード
html
1<section id="main_contents" style="width: 654px;"> 2 <div> 3 <p> 4 ヒットなし 5 </p> 6 </div> 7中略 </section> 8
VBA
1 Dim objIE As InternetExplorer 2 Dim objTag As Object 3 4For Each objTag In objIE.document.getElementByID("main_contents") 5 6 If InStr(objTag.outerHTML, "ヒットなし") = 0 Then 7 8 ’処理 9 10 End if 11Next
###補足情報(言語/FW/ツール等のバージョンなど)
より詳細な情報
Excel 2007
回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。