【Excel VBA備忘ログ】FRAMEを持つサイトの構造を調べるには(修正)

0)準備
　Dim IE as object
　Dim frame as FramesCollection
　Dim url as string

　Set IE = CreateObject("InternetExplorer.application")
　IE.Navigate url
　※urlは開きたいURLを指定

1)フレーム数のカウント方法
　IE.document.frames.length

　指定したURL直下のフレーム数(3つなら3を返す)
　0ならフレームを使用していない。

2)フレームの名前
　Set frame = IE.document.frames
　としておいた後で

　フレームが複数ある場合
　frame(n).Name
　フレームが１つの場合
　frame.Name

　※nには0～IE.document.frames.length-1が指定可

3)指定したフレームの中身の取得
　frame(n).document.body.innerText
　frame(n).document.body.innerHTML

4)孫フレームの探索
　3)子フレームに対し、frame(n).frames.lengthで再度フレーム数を
　チェックし、1以上であれば孫フレームが存在する。以降、再帰的に調べる。

　※孫フレームが存在する場合、子フレームのinnerTextが空の事が多い。
　　（必ずしもそうではない）

★★何でも見つかる！Ｙａｈｏｏ！ショッピング★★