e-learningサイトの操作 削除
| Message#5 2015年2月8日(日)00時18分 From: VBAマスター |
| この質問みんな熱く語ってるなーと思ったら同じ人だったんですね（笑） とりあえず１つつっこませてもらうと > A > Function IEwait(ByRef objIE As Object) > Do While objIE.readystate <> 4 > DoEvents > Loop > End Function > > D > Public Function IEButtonClick(ByRef objIE As Object, buttonValue As String) > Dim objInput As Object > For Each objInput In objIE.document.getElementsByTagName("INPUT") > If objInput.Value = buttonValue Then > objInput.Click > Exit Function > End If > Next > > End Function ここってFunctionプロシージャにする必要ないですね。 というのも戻り値の設定もないですし。 あと今回問題になっているのがボタンクリック時の読み込みまでの待機処理になりますが、下記が結構まとまっているので一度読んでみたらどうですか？ 長いんで疲れますけど、かなり待機処理について詳しく書いているので参考になると思います。 http://www.vba-ie.net/ie/subroutine2.html |
上のメッセージを削除します。
よければパスワードを入力し、削除ボタンをクリックしてください。
