みんなの「教えて(疑問・質問)」にみんなで「答える」Q&Aコミュニティ

こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

締切り済みの質問

ExcelマクロでIEのURLを取得する方法

Excel VBAを使ってIEで開いているURLを取得する方法を探しています。

具体的な使用方法としてはIEを使い「iタウンページ」で会社を検索して
目的のページが見つかった際に以下のマクロを動作させたいのです。

その際、*************部分にその時開いているIEのURLを自動で
取り込みたいのですが方法が分かりません。どなたか御教示いただけ
ますでしょうか。よろしくお願いします。

------------------------------------------------
Sub データ抽出()

With ActiveSheet.QueryTables.Add(Connection:= _
"url;*************", _
Destination:=Range("A1"))
.WebSelectionType = xlEntirePage
.WebFormatting = xlWebFormattingNone
.Refresh BackgroundQuery:=False

End With

End Sub
------------------------------------------------

投稿日時 - 2011-06-19 20:20:27

QNo.6821404

困ってます

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

ANo.1

こんなことに、やり方のプログラムを提供したら、幇助になるのではないか、という心配がある。注意。
http://itp.ne.jp/guide/web/notice/
禁止事項
自動的にアクセスするプログラムを使用してiタウンページに繰り返しアクセスする行為

投稿日時 - 2011-06-19 21:08:27

あなたにオススメの質問