サイトによって、Navigateが、連続してできない 削除
| Message#1 2015年4月13日(月)12時21分 From: 名無しさん |
| ＶＢＡのＩＥ制御サイトは、大変勉強になりました。 いろいろやってみて、どうしてもわからないことがあり、質問します。 サイトによって、Navigateが、連続してできないことがあります。 以下は、そのコードです。 With ieObj .Visible = True .navigate "http://quote.tse.or.jp/tse_n/quote.cgiF=listing%2FJDetail1&MKTN=T&QCODE=6753" Application.Wait TimeSerial(Hour(Now()), Minute(Now()), Second(Now()) + 5) .navigate "http://www.jpx.co.jp/" Application.Wait TimeSerial(Hour(Now()), Minute(Now()), Second(Now()) + 5) .navigate "http://quote.tse.or.jp/tse_n/quote.cgiF=listing%2FJDetail1&MKTN=T&QCODE=3382" Application.Wait TimeSerial(Hour(Now()), Minute(Now()), Second(Now()) + 5) End With もともとは、ieView や ieNavi を使ってやっていたのですが、どうしても変な現象 がでるため上のコードで試しました。 現象は、次の通りです。 F5キーで実行すると、３つ目の.navigateでオートメーションエラーになったり、表 示せずに終わったりします。 そのあと、.Quitをやっているのですが、表示しないで終わってもブラウザが閉じな いのです。 ところが、最初の.navigateの直後でブレークポイントを設定し、F5キーで走らせる と、正常に走って、正常に終了します。 他のパソコンでは動く人もいるので、IEの設定か何かなのでしょうか？ 一回ごとにQuitしてNavigateするなら動くのですが、Quitせずに連続してスマートに Navigateしたいのです。 サイトによってはうまく動くものもありますので、何が原因なのか、行き詰っていま す。 動作環境を以下になります。 Windows7 IE11 Excel2010 よろしくお願いします。 |
上のメッセージを削除します。
よければパスワードを入力し、削除ボタンをクリックしてください。
