□ 以下のリンクで解説してる部分で、分からない事があるので質問します。
http://ie.vba-ken3.jp/Methods/Navigate2/
ページ異動後は、オブジェクト内の参照が出来なくなってしまうのはどうしてなのでしょうか。
□ 以下、サンプルコードになります。
Private Sub CommandButton1_Click()
Set objIE = CreateObject("InternetExplorer.application") objIE.Visible = True objIE.navigate "http://www.xxx.jp/a/auth" Application.Wait (Now + TimeValue("00:00:03")) objIE.document.all("login_id").Value = Range("C8") objIE.document.all("password").Value = Range("C9") objIE.document.Forms(0).Submit Application.Wait (Now + TimeValue("00:00:05")) objIE.Navigate2 "http://www.xxx.jp/admin/0000/info/input", &H800 'objIE.document.Forms(0).Item("titel").Value = "移動したページのタイトルに入れたい文字列" 'MsgBox objIE.document.all.GetElementsByClassName("style1") 何も表示されない
'ここで以下のコードを書くと、ログイン「objIE.navigate "http://www.xxx.jp/a/auth"」
'のh1部分が表示されます。
MsgBox objIE.document.getElementsByTagName("h1")(0).outerHTML objIE.Quit
End Sub
ちょっとわかりずらいかもしれませんが、何とかご教授お願い致します。
※ 画面移動を待つ処理が単にないだけなのでしょうか??
Do While objIE.Busy Or objIE.ReadyState < READYSTATE_COMPLETE
DoEvents
Loop
※ 必須の参照設定が出来ていないとか。
回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2015/04/23 05:52