インターネットエクスプローラーを起動する方法

3月 12, 2014

0 6070

Q.Excelのマクロ付きブックで、商品管理を行っているのですが、商品毎にECサイトの価格をチェックする業務があります。その際、商品にあったECサイトを表示するボタンを設けたいと思うのですが、VBAからインターネットエクスプローラーを起動し、サイトを表示することはできるのでしょうか。

A.Excelマクロでは、InternetExplorer.Applicationというオブジェクトを使用すれば簡単に実現できます。

まずは簡単なやり方でインターネットエクスプローラーの表示方法を確認しましょう。
下記は、マクロの中で書いたアマゾンのサイトを表示させるコードとなります。

Sub ExecIE()

Dim ie As Object
Set ie = CreateObject(“InternetExplorer.Application”)
ie.Navigate “http://www.amazon.co.jp” ‘★
ie.Visible = True

End Sub

Excel画面の「開発」リボンの「マクロを表示」から上記関数を選択し直接実行して動作に問題がないか確認して下さい。
それができたら、後は簡単ですね。コード中の★の部分を、商品にあったECサイトのアドレスが代入されるようにプログラムを変更すれば良いのです。
このようにして、単純なホームページの表示は実現できます。

ここからは、さらに発展した使い方です。
ECサイトでは、多くのサイトで、サイトのアドレス(URL)にパラメーター(商品名や、ISBNなど)を付けることで、商品ページをダイレクトに表示できるような仕掛けがあります。
例えば、Amazonでは、”http://www.amazon.co.jp/gp/search?field-keywords=” の後ろに、検索キーワードを入れたURLで、検索結果のページがすぐに開きます。
※ただし、ここで指定できるのは英語のみ。日本語は、「エンコード」という処理をしないと正常に処理されません。これについては、興味ある方は調べてみて下さい。
この方式が分かれば、Excel上に記入した、ある商品の名前をamazonで検索した状態でインターネットエクスプローラーを開く、という処理が自動化できるということになります。
アイデア次第でいろいろ活用できそうですね。是非、ご活用下さい。