![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
こんにちは
以下のスクリプトで質問があります。
objIE.documentをウオッチリストに登録して確認すると「変数なし」
htmlDocを同様に確認するとプロパティなどの要素がが表示されます。
htmlDocに代入していると思うので、
objIE.documentにも同様に表示されてもいいような気がしますが
なぜ表示されないのでしょうか?
このページを読み込んだ時objieのすべての要素をしゅとくしているのではないのでしょうか?
Sub testIE()
Dim objIE As InternetExplorer 'IEオブジェクトを準備
Set objIE = CreateObject("Internetexplorer.Application") '新しいIEオブジェクトを作成してセット
objIE.Visible = True 'IEを表示
objIE.navigate "http://www.jreast.co.jp/" 'IEでURLを開く
Do While objIE.Busy = True Or objIE.readyState < READYSTATE_COMPLETE '読み込み待ち
DoEvents
Loop
Dim htmlDoc As HTMLDocument 'HTMLドキュメントオブジェクトを準備
Set htmlDoc = objIE.document 'objIEで読み込まれているHTMLドキュメントをセット ①
Debug.Print htmlDoc.Title 'HTMLドキュメントのタイトルを表示
End Sub
![「vbaからIEを操作するための記載したさ」の質問画像](http://oshiete.xgoo.jp/_/bucket/oshietegoo/images/media/b/683483_589a597107f55/M.png)
No.1ベストアンサー
- 回答日時:
こんにちは。
>このページを読み込んだ時objieのすべての要素を取得しているのではないのでしょうか? (一部訂正)
確かに、全部取得しています。
全体的には、 objIE.document.body.innerHTML
を、テキストファイルに、落としてその中で調べることができます。
はっきりしたことは分かりませんが、対象のobjIE/WebサイトのHTMLは、全体的にはオブジェクトとしていろいろあるので、逆に雛形が作れず見れないのかと想像しています。
ふつう、私は、こういう場合の開発は、Debug ツールを使わないで、直接、IEのF12開発ツールで、画面を半分に割って、それで調べながら行っています。そして、Class や ID を切り出して、その中身を調べます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・ゆるやかでぃべーと タイムマシンを破壊すべきか。
- ・「I love you」 をかっこよく翻訳してみてください
- ・歩いた自慢大会
- ・許せない心理テスト
- ・字面がカッコいい英単語
- ・昔のあなたへのアドバイス
- ・かっこよく答えてください!!
- ・あなたが好きな本屋さんを教えてください
- ・スタッフと宿泊客が全員斜め上を行くホテルのレビュー
- ・【大喜利】【投稿~8/27】 こんなガソリンスタンド二度と来るか!なぜそう思った?
- ・これ何て呼びますか Part2
- ・人生で一番思い出に残ってる靴
- ・【お題】動物のキャッチフレーズ
- ・【お題】甲子園での思い出の残し方
- ・ゆるやかでぃべーと すべての高校生はアルバイトをするべきだ。
- ・「それ、メッセージ花火でわざわざ伝えること?」
- ・自分用のお土産
- ・人生で一番お金がなかったとき
- ・一番好きなみそ汁の具材は?
- ・泣きながら食べたご飯の思い出
- ・ちょっと先の未来クイズ第1問
- ・ゴリラ向け動画サイト「ウホウホ動画」にありがちなこと
- ・初めて自分の家と他人の家が違う、と意識した時
- ・単二電池
- ・チョコミントアイス
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
worksheetFunctionクラスのVloo...
-
VBAで既に開いている別アプリケ...
-
「Columns("A:C")」の列文字を...
-
VB6 ファイルのリネームの仕方
-
[VBA]CDOメッセージ送信エラー
-
ExcelVBAでのNZ関数について
-
エクセルのVBAの標準モジュール...
-
textBox isNot Nothing とは
-
VBAで Set wb = Sheets(1).Cop...
-
VBで引数にDictionaryオブジェ...
-
ASPでExcelファイルを開く場合
-
横軸ラベルの追加に関するエラ...
-
エクセルVBAの散布図の近似曲線...
-
WordにOLEで埋め込んだExcelでW...
-
(初心者です)VBAについて。「実...
-
エクセルVBA 他ブックのシート...
-
再質問:Excel メモリ不足です...
-
VBA:オートシェイプの線の長...
-
テキストボックス中の文字列の...
-
パソコンへの「Dropbox...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
worksheetFunctionクラスのVloo...
-
「Columns("A:C")」の列文字を...
-
エクセルのVBAの標準モジュール...
-
実行時エラー 3265「要求された...
-
VBAで既に開いている別アプリケ...
-
Excelでフィルタをかけると警告...
-
オブジェクトが見つかりません
-
EXCEL VBA オートシェイプナン...
-
VBAからPDFファイルにパスワー...
-
VBAで Set wb = Sheets(1).Cop...
-
ある文字列が全て数字であるか...
-
PowerPointVBAでスライドマスタ...
-
[VBA]CDOメッセージ送信エラー
-
AccessVBAで「dim dbs as datab...
-
VBAで作成するメール(開封確認...
-
VBからPDFファイル自動生成...
-
上下の位置揃えについて
-
ExcelVBAでのNZ関数について
-
テキストボックス中の文字列の...
-
エクセルマクロエラー「'Cells'...
おすすめ情報