表示上ページが移動しているにも関わらず、移動後のページエレメントが読めない
昨日以降(0) 2日前以降(0) 3日前以降(0) 4日前以降(0) 5日前以降(0)
Message#3 2017年5月31日(水)16時07分 From: NMC | 返事 削除 変更 |
初心者のメッセージ(#1)への返事 HTMLの<A>タグには、target属性があり、target="_blank"では別画面になるので、objIEがクリック後の別画面を取得できないのではないでしょうか。 http://www.htmq.com/html/a.shtml そのような場合に備えて、私は、クリック前に、target="_blank"の全てを、Target = "_top"かTarget = "_self"に書き換えています。 Call Link修正(objIE)'★ 'ログインボタンを選択、管理一覧ページへ移動 Call tagClick(objIE, "button", "ログイン") ★追加では駄目ですか? Function Link修正(ByRef objIE As Object) Dim objDoc As Object, i As Long, k As Long Set objDoc = objIE.Document For i = 0 To objDoc.Links.Length - 1 'Debug.Print i & "---" & objDoc.Links(i).href 'Target If objDoc.Links(i).Target = "_blank" Then objDoc.Links(i).Target = "_top" '"_self" k = k + 1 End If Next i Debug.Print k & "箇所のリンクを修正" End Function |
昨日以降 2日前以降 3日前以降 4日前以降 5日前以降