[ホーム] ＞ [VBScript FAQ 一覧] ＞ [【コピペ用】IE を Excel のVBAから起動する]

【コピペ用】IE を Excel のVBAから起動する | VBScript / VBA FAQ

VBA から IE を起動するサンプル

Microsoft VBA から IE(Internet Explorer)を起動するサンプルプログラムを紹介します。
Excel のブックシートからIEを起動したい場合んど活用いてください。

手順は以下の通りです。

(1)VBAで標準モジュールを追加します。(Microsoft Visual Basic for Applicationから)
(2)以下のサンプルコードを"General"に追加します。
(3)"リボン"や"クイックアクセスバー"にこのサンプルプログラムを登録します。



Sub StartIEFromVBA()

 With CreateObject("InternetExplorer.Application")

   'URLを指定し移動する

   

   If ActiveCell.Value <> "" Then

       .Navigate ActiveCell.Value

       Rem Internet Explorerを表示

       .Visible = True

   Else

       MsgBox "現在のセルは空白です。URLを入力してください。"

   End If

 End With



End Sub

以上で設定は完了です。

(4)
IEで起動したいURLが記載されたセルを選択します。
(5)
上記のボタンを実行します。これでセルで指定されたURLを元にIEが起動されます。もし"現在のセルは空白です。URLを入力してください。"と表示された場合は選択中のセルが空白ということです。再度確認してください。
現在のセルは"ActiveCell.Value"により取得しています。

VBAからIEを開始する

IEのプロセス

.Visible = True により起動したIEが画面に表示されます。もし.Visible = Trueと設定した場合、画面にIEは表示されないので注意してください。
もしこのサンプルプログラムを実行しても画面に表示されない場合は、以下 tasklist.exe コマンドでプロセスが起動しているか確認してください。プロセスを強制終了する場合はプロセスIDを指定して "taskkill.exe" コマンドを使用します。



C:\WINDOWS\system32>tasklist | findstr iexplore.exe

iexplore.exe                 13348 Console                    1    106,996 K

参考：
マクロが実行されない場合の確認事項
オートメーションエラーが Excel VBA による IE11の操作で発生した場合の対処

参照が不正または不完全です

サンプルプログラムを実行した場合、"参照が不正または不完全です"と表示される場合があります。
この場合、CreateObject("InternetExplorer.Application" が正常に実行されていない可能性があります。

Windowsを再起動する、不要なIEは停止するなどの処理を試みてください。

[ホーム] ＞ [VBScript FAQ 一覧]

(ご注意) 本サイト内の内容を使用して発生したいかなる時間的損害、金銭的損害あるいはいかなる損害に対して、いかなる人物も一切の責任を負いません。あくまでも個人の判断で使用してください。
本サイト内掲載されている情報は、著作権法により保護されています。いかなる場合でも権利者の許可なくコピー、配布することはできません。
このページはリンクフリーです。(このページへの直接リンクも可能です。)
雑誌等での紹介は特に連絡は不要です。
Copyright(c) tooljp.com 2007-2019