ＶＢＡでＩＥ操作ができない エラーになる

質問

vista+オフィス２００７です。
エクセルで
---------------------------------------------------------
Sub ie_test()
Dim objIE As Object
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Visible = True

objIE.Navigate "http://www.google.co.jp/"
End Sub
---------------------------------------------------------
を実行したいのですができません。

Set objIE = CreateObject("InternetExplorer.Application")
の部分で、しばらく固まり、その後
「実行時エラー'-2147467259(80004005)':
オートメーションエラーです。 エラーを特定できません」
と表示されてしまいます。

前にvista+オフィス２００３の時は
上記のコードで問題なく動作しました。

２００７でも動く方法を教えてください。ご回答よろしくお願いします。

回答No.2

samtomsan · ベストアンサー

「office2007 vba InternetExplorer.Application」で検索してしてみてください。色々な回答が見つかりますが決定的な解決策はないようです。
保護モードを解除するとか他の方法を使うとか、解決した例もあるようですが（英語）尻切れトンボに終わっている回答が多いようです。
下記など参考になるかもしれません。
ただし、ご質問の箇所でのエラーではないようです。
いずれもXPでは問題ないようで、Vista特有のように書かれています。
http://www.ken3.org/cgi-bin/group/vba_ie7.asp
http://www.google.co.jp/#hl=ja&sugexp=frgbld&gs_nf=1&cp=43&gs_id=5r&xhr=t&q=office2007+vba+InternetExplorer.Application&pf=p&sclient=psy-ab&oq=office2007+vba+InternetExplorer.Application&aq=&aqi=&aql=&gs_l=&pbx=1&bav=on.2,or.r_gc.r_pw.r_qf.,cf.osb&fp=1650a04ffb92befa&biw=1055&bih=615
http://social.msdn.microsoft.com/Forums/en/isvvba/thread/d302aa96-b783-4a2b-afc5-ac9716e72530
http://vbaie.blog111.fc2.com/

お礼

再起動したら、なぜか正常に動きました。
お騒がせしました。
ありがとうございました。

回答No.1

DreamyCat

当方の環境が違いますが
XP, Excel2007　,IE8
Win8CP, Excel2010 ,IE10ベータ
ではどちらも問題なく動作します。

VistaかExcel2007の更新ファイルが最新になっていないか、システムに問題があるのではないでしょうか。

お礼

わざわざ検証していただいてありがとうございます。
再起動したら、なぜか正常に動きました。
お騒がせしました。