動画で三流解説
動画の簡単な説明
テストのソース →
http://ken3-info.blog.ocn.ne.jp/code_gomibako/2009/02/vba_ie_dbaf.html
に置いておきます。
objTD(n).InnerTEXT = "金額-1"
を見つけて、n+2番目の中身を取り出します。
ポイントは、 Set objTD = objIE.document.all.tags("TD") '.tags("TD")でTDタグを抜く
で、TDタグを取り出して、 For n = 0 To objTD.Length - 1 'カウンタ０から.length - 1 までまわす。
で、ループをまわし、 If objTD(n).InnerTEXT = "金額-1" Then 'テキストの中身が金額-1かきく
で、項目の判断、 strKINGAKU = objTD(n + 2).InnerTEXT '隣の値をセットするここでは＋２で、ほしい隣のデータを取り出してます。
う〜ん、キレがないなぁ？？？
動画解説やテスト結果
www.youtube.com動画元: 2/17 VBA IE テーブルから金額抜き出しのテスト - YouTube
