実行中のまま　指定したURLをIEで起動させるサンプルコードにて

最近の書き込み件数：今日 0件、昨日 0件
未読分：2件

Excel VBAでIEを思いのままに操作できるプログラミング術 Excel 2013/2010/2007/2003対応

近田伸矢, 植木悠二, 上田寛

IEのデータ収集＆自動操作のプログラミング本はこの1冊だけ！IEの起動やポップアップウィンドウ、表示を制御する基本的なコードはもちろん、テキストボックスやラジオボタン、表、ハイパーリンクなどのHTML部品を制御する方法など、自動操作に欠かせないノウハウを丁寧に解説。

Message#2 2017年9月19日(火)07時57分
From: ジャッカル

返事削除変更

VBAコードを見る限り1つしか開かないはずだが。。。

> こちらのサイトで勉強しているのですが、
> 指定したURLをIE(InternetExplorer)で起動させるサンプルコード
> を実行すると、
> IEが二つ立ち上がり、一つは接続中のまま、もう一つはhttps://www.vba-ie.net/
> が開きます。
>
> Microsoft Visual Basicは実行中のままとなり、一向に処理が終わらず困っています。
> どうすればいいかご教授いただけますでしょうか。
>
>
> 使用したVBAコードは以下の通りとなります。
>
> Sub sample()
>
> 　Dim objIE As InternetExplorer
>
> 　'IE(InternetExplorer)のオブジェクトを作成する
> 　Set objIE = CreateObject("InternetExplorer.Application")
>
> 'IE(InternetExplorer)を表示する
> objIE.Visible = True
>
> '指定したURLのページを表示する
> objIE.Navigate "http://www.vba-ie.net/"
>
> 　'完全にページが表示されるまで待機する
> 　Do While objIE.Busy = True Or objIE.ReadyState <> 4
> 　　DoEvents
> 　Loop
>
> End Sub

Message#1 2017年9月18日(月)18時40分
From: VBA初心者

返事削除変更

こちらのサイトで勉強しているのですが、
指定したURLをIE(InternetExplorer)で起動させるサンプルコード
を実行すると、
IEが二つ立ち上がり、一つは接続中のまま、もう一つはhttps://www.vba-ie.net/
が開きます。

Microsoft Visual Basicは実行中のままとなり、一向に処理が終わらず困っています。
どうすればいいかご教授いただけますでしょうか。

使用したVBAコードは以下の通りとなります。

Sub sample()

　Dim objIE As InternetExplorer

　'IE(InternetExplorer)のオブジェクトを作成する
　Set objIE = CreateObject("InternetExplorer.Application")

'IE(InternetExplorer)を表示する
objIE.Visible = True

'指定したURLのページを表示する
objIE.Navigate "http://www.vba-ie.net/"

　'完全にページが表示されるまで待機する
　Do While objIE.Busy = True Or objIE.ReadyState <> 4
　　DoEvents
　Loop

End Sub