プロが教える店舗&オフィスのセキュリティ対策術

環境はACCESS2000、XPです。

コードの中で
既に開いているIE(タイトル名はgoo)を
インスタントしようと思い
以下のようしてみました。

Dim obj As Object
Set obj = CreateObject("InternetExplorer.Application", "goo")

「リモートサーバーがないか、使用できる状態ではありません」
というエラーが出てしまいました。

どのようにすれば取得できますか?

A 回答 (2件)

すでに起動している IEを取得するのは難しいようです



set obj = CreateObject("InternetExplorer.Application")
obj.Visible = True
obj.Navigate "http://www.goo.ne.jp"

といった具合のほうがいいようです

またIEオブジェクトを参照設定して 静的オブジェクトにすれば
IEのイベントを AccessVBA側で処理できるようになります
参照設定で『Microsoft Internet Controls』にチェックをつけてOK

dim WithEvents objIE as InternetExplorer
これで objIEに対するイベントが記述可能になります
ページを表示し終わった場合なら DocumentComplateイベントになります
    • good
    • 0

Shell.ApplicationのWindowsコレクションで取得できるようです。



参考URL:http://vsug.jp/tabid/63/forumid/72/postid/1115/v …
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!