ＶＢＡでＩＥオブジェクトを呼ぶとアドレスバーが出ません

質問

初めて投稿します。
会社でインターネットの自動ログインのマクロを組みました。
ネットで調べても分からずお手上げ状態です↓

・マクロで新しくインターネットを開くと、アドレスバーなどが消えて開くようになり、プライバシーの鍵のマークが表示されなくなりました。

先週まではうまく表示されていたのですが、共有のＰＣなので誰がいつ使ったか分かりません。
インターネットオプションや参照設定など見た限りでは変更されていないようでした。
何か原因に心当たりのある方いらっしゃいましたら、ご教授いただければ幸いです。

参考にマクロを載せておきます（うろ覚えですが…）。

Sub test()
　Set ie = CreateObject("InternetExplorer.application")
　ie.Visible = True
　ie.Navigate ("http://www.google.co.jp/")
　……省略……
End Sub

回答No.3

Wendy02 · ベストアンサー

こんにちは。

>Sub test()
>　Set ie = CreateObject("InternetExplorer.application")
>　ie.Visible = True
>　ie.Navigate ("​http://www.google.co.jp/")​

これだけでは、アドレスバーなどが隠れてしまうような内容ではありません。
マクロ自体の問題ではないと思います。良くあることですが、ie.Visible = True にしても、終了時のIEの設定がそのまま残ります。ですから、一回、IEの表示を手動で戻してください。その方がマクロで処理するよりも早いです。

お礼

Set ie = Nothing
を付け足したところ直りました！
丁寧に教えてくださり、ありがとうございました。

回答No.2

nak777r

ツールバー表示非表示
ie.Toolbar = True

ステータスバー表示非表示
ie.Statusbar = True

こんな感じ

お礼

回答ありがとうございます。
初めに試してダメだったのでお手上げでした；；

回答No.1

WDY

参考にどうぞ
http://www.ken3.org/cgi-bin/group/vba_ie.asp

これかな？
　↓
objIE.AddressBar = True 'URLなど アドレスバーは確認のため、表示する

お礼

早速の回答ありがとうございます。
既に試してもダメだったのでお手上げでした；；