すでに起動しているHPのテキストボックスに値を出力して検索する方法（vba ie） 削除
| Message#4 2016年5月25日(水)00時37分 From: ジャッカル |
| VBA IEの掲示板は↓だよ http://www.vba-ie.net/qanda2/qanda.cgi > 下記@，A，Bが既に開いている状態でテキストボックスに値を出力して検索（虫眼鏡）をクリックする方法（コード）のご教示よろしくお願いします。 > @TDB企業サーチ（https://www.tdb.co.jp/service/u/1000.jsp）の「企業名」テキストボックスに値を出力・検索する方法やAウィキペディア（https://ja.wikipedia.org/）の「検索」テキストボックスに値を出力・検索する方法を、BROBINS（https://robins.jipdec.or.jp/robins/）の「キーワードを入力してください」テキストボックスに値を出力・検索する方法を教えていただきたく質問しました。 > 本書「Excel VBAでIEを思いのままに操作できるプログラミング術 」4-2のコードや、以下のコードなどいろいろ試しましたが、私の知識不足もあり全くダメでした（本書サンプルや下記コードどうりには動きます）。 > Sub ie_test() 'IEテストする。'IEの起動 > Dim objIE As Object '変数を定義します。 > Set objIE = CreateObject("InternetExplorer.Application") 'オブジェクトを作成。 > objIE.Visible = True '可視、Trueで見えるようにします。 > objIE.Navigate "http://www.google.co.jp/"'処理したいページを表示します。 > 'ページの表示完了を待ちます。 > While objIE.ReadyState <> 4 Or objIE.Busy = True '.ReadyState <> 4の間まわる。 > DoEvents '重いので嫌いな人居るけど。 > Wend > 'google検索項目(name=q)にセットする。 > objIE.Document.getElementsByName("q")(0).Value = "三流" > すみません、厚かましいお願いだとは思いますがよろしくお願いします。 |
上のメッセージを削除します。
よければパスワードを入力し、削除ボタンをクリックしてください。
