動画で三流解説
動画の簡単な説明
ソースコードと解説は
http://d.hatena.ne.jp/ken3memo/20120407/1333765069
を見てください。
全体の流れは
http://ken3hitori.g.hatena.ne.jp/bbs/30
を見てください。
'シェルのオブジェクトを作成する
Set objShell = CreateObject("Shell.Application")
ここから、
For Each objWindow In objShell.Windows
で回して、
TypeNameでHTMLDocumentか判断、
If TypeName(objWindow.document) = "HTMLDocument" Then
さらに、
URLで判断(見つけてみました。)
動画解説やテスト結果
www.youtube.com動画元: テスト JRA IPAT 1.1 情報メニューを探す - YouTube