• ベストアンサー

VBAで・・・

VBA初心者です。 VBAを使ってインターネットエクスプローラ等を立ち上げ、しかも、検索のところに文字などの入力ができるのでしょか? 例えば、IEで「GOO」につて検索する時はどんな感じになるのですか? お願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • masa_019
  • ベストアンサー率61% (121/197)
回答No.1

こんにちは。 エクセルVBAで良いのでしょうか? 例えば、gooのトップページ(http://www.goo.ne.jp/)の 検索窓に"goo"と入力して、横にあるウエブと表示されたボタンをクリックするには、以下のような感じで出来ると思います。 Option Explicit Sub Test() Const READYSTATE_COMPLETE As Long = 4 Dim oIE As Object Set oIE = CreateObject("InternetExplorer.Application") oIE.Visible = True oIE.navigate "http://www.goo.ne.jp/" Do Until oIE.readyState = READYSTATE_COMPLETE Loop oIE.document.all.MT.Value = "goo" oIE.document.all.web4.Click End Sub なお、上記のコードを試す前に、IEのセキュリティ設定で「暗号化されていないフォームデータの送信」を有効にしておく必要があります。

6765
質問者

お礼

ありがとうございました。大変参考になりました。 僕は、かなりの初心者ですので、もう少し教えてくださいませんか?(お時間があればいいのですが…) 文字を入力させたり、クリックさせたりするのに何か規則的な項柄があるのですか? よろしくお願いします。

全文を見る
すると、全ての回答が全文表示されます。

その他の回答 (1)

  • masa_019
  • ベストアンサー率61% (121/197)
回答No.2

>文字を入力させたり、クリックさせたりするのに何か規則的な項柄があるのですか? 申し訳ありませんが、自分も試行錯誤しながらやっているので、規則的な事柄というものをうまく説明できません。 ただ、やり方としては先ずページのソースを表示して、 フォームコントロールの名前を調べます。 文字入力フィールドならソースの <input style="ime-mode: active;" type="text" name="MT" value="" size="45"> と記述された行の name="MT" で名前がわかりますから 後は、Object.value="文字列" で文字入力出来ます。 ボタンのimageなら <input type="image" name="web4" value="・ヲ・ァ・ヨ" src="/img/submit/t_01.gif" alt="・ヲ・ァ・ヨ" border="0" height="20" width="68"> と記述された行の name="web4" の部分から名前がわかります。 こちらは Object.Click でクリックできます。 参考になりましたでしょうか?

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • excel VBA で、エクスプローラを開くとき

    excel VBA で、フォルダを指定してエクスプローラーを開くことができますが、そのとき検索文字も指定できるのでしょうか。 具体的には、以下のようにpath0でパスを指定して、エクスプローラーが開きます。 Shell "c:\windows\explorer.exe " + path0, vbNormalFocus このとき、検索文字列を指定したいのですが、可能でしょうか? エクスプローラの右上の虫眼鏡のウインドウに入れる文字を指定して、検索を自動実行させたいのですが。

  • IE以外のインターネット検索について

    パソコン初心者です。MSNエクスプローラーから検索エンジンにアクセスし、文字を入力するとやはり過去に検索したデータが表示されるのですがどうしたら消せますか?IEのほうは消せたのですが。

  • vbaを使ってie内に文字をいれたい

    vba初心者です。vbaで既に開いているIE(画面は一つだけ)の複数あるテキストボックス内に文字を入れたいと思います。うえから1番目、3番目、5番目にいれたいときどのように書けばいいでしょう?

  • VBAからIEの操作

    グーグルをIEで開いてVBA(語句)を検索して見終わったら IEを閉じる作業をしたいのですが、検索窓にVBA(語句)を 入力するところでエラーとなります。初心者ですが、なんとか 勉強したいのでよろしくお願いいたします。 Sub ie_test_Navigate() Dim objIE As Object Set objIE = CreateObject("InternetExplorer.application") objIE.Visible = True objIE.Navigate "http://www.google.co.jp/" IE.document.all.q.Value = "VBA" IE.document.all.btnG.Click If MsgBox("IEを閉じますか?", vbYesNo, "終了確認") = vbYes Then objIE.Quit End If Set objIE = Nothing End Sub

  • Access VBAで

    VBAの超初心者です。 Accessのフォームでコマンドボタンを押すと、決まった文字が入力できるフォームを作りたいと思っています。 クリック時のイベントプロシージャーはどのように記入すればよいのでしょうか。 ど素人な質問ですみません。

  • VBAのコードの表示

    VBA初心者です。 会社でVBAの練習のためコードを入力し確定すると文字が青く塗りつぶされ表示されなくなります。この現象の直しかたを教えてください。

  • 文字色を変えたい(ACCESS VBA)

    ACCESS VBA初心者です。 プログラムの進行状況を、文字色を変えることによって表現したいのですが、文字色のパラメーターをどう表現するのか分かりません。 教えていただきたいのと、またこのような細かいことを教えてGOOで聞き続けるのも無理があるので、調べ方の基本などを教えてください。 ACCESSの教科書は初級、中級(VBA)、辞書的なもの3冊あります。

  • カーソル下に表示される文字について。

    VistaでIE7を使用しています。 サイトを見ている時にカーソルをリンク画像のところへ持っていくと カーソルの下に文字が表示されます。 例えば、gooトップの右上にある『gooトップの使い方』へカーソルを持っていくと 【gooトップの使い方】と言う文字が出る感じです。 IEの右上にある検索窓にカーソルを持っていくと 【Webを検索する語を入力(Ctrl+E)】と出ます。 この文字を表示しないような設定はありますか? よろしくお願いします。

  • エクセルVBA

    初心者でレベルが低いですがよろしくお願いします。 VBAでエクセルのセル内の文字列を読み込んでその中の文字を検索し、ヒットしたときにそのヒットした文字だけを変換して取得することが可能でしょうか?? 列 A1に hanamiti/1234 という文字列が入っていて この文字列の中の / を検索し、あった時に _ に変更する。 結果 hanamiti_1234 として取得した。 ということができるのでしょうか? ご教授お願いいたします・。

  • オートコンプリートが使えない。

    初心者です。OSはME、インターネットエクスプローラ5.5です。検索画面に最初の文字を入力するとオートコンプリートが表示され、一つを選んでクリックすると検索画面にそれが表示されます。ところが次に検索ボタンをクリックすると最初に入力した文字に戻ってしまい、その文字で検索してしまします。どうしてなのでしょうか。よろしくお願いします。