タブのクリックの方法について
昨日以降(0) 2日前以降(0) 3日前以降(0) 4日前以降(0) 5日前以降(0)
Message#7 2015年3月28日(土)10時14分 From: VBAマスター | 返事 削除 変更 |
> spanというものに対して「1分」というのを検索して一致したらクリックという感じのソースコードに見えますが、この中に「1分」は複数回出現しているという認識でいたので、どの「1分」をクリックするのかな?と思っていました。 > 生成されたHTMLだと1個だったのでしょうか?? よく見てなかったですが、たしかに2つありますね。 最後のやつが表示されている「1分」のやつっぽいので「Exit For」を削除すれば最後の「1分」がクリックされます。 Sub test() Dim objIE As InternetExplorer Call ieView(objIE, "http://jp.demo.highlow.net/Account/QuickDemoLogin?language=ja-JP") objIE.document.getElementById("FixedPayoutHLOOD").Click 'クリック Call ieCheck(objIE) 'span要素を全て抽出 For i = 0 To objIE.document.getElementsByTagName("span").length - 1 If objIE.document.getElementsByTagName("span")(i).innerText = "1 分" Then objIE.document.getElementsByTagName("span")(i).Click Call ieCheck(objIE) 'ループ解除削除 'Exit For End If Next i End Sub ただし、参考URL自体が現在データがない状態で表示されているので、正常に表示されるかは確認できませんでした。 とりあえず表示上は「1分」が黄色背景で選択されているように見えますが。 |
昨日以降 2日前以降 3日前以降 4日前以降 5日前以降