EXCEL VBA で URL内容を 取得できない

EXCEL VBAで　URLの内容を取得しようとしていますが、URLの内容中に FINNAIRの広告ラベル? がトップにでてくる場合には　URLの内容が取得できません。広告ラベルが　時々に変更されますが、FINNAIR以外の 広告ラベルの場合は　URLの内容を取得できます。　FINNAIRの　広告ラベルも　取得できるようにするには、どうすればいいのでしょうか?
FINNAIRの広告ラベルは、短時間のうちに　変化しているようです。なぜ、取得できないのか、まったくわかっていません。　解決方法を教えていただきたく、よろしくお願いします。

Sub IEデータ取得()
Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
IE.navigate "http://www.japantimes.co.jp/news/"
While (IE.readyState <> 4) Or IE.busy = True
DoEvents
Wend
DoEvents
IE.document.body.Focus
IE.ExecWB 17, 0
IE.ExecWB 12, 0
Excel.Application.CutCopyMode = False
Sheets.Add.name = "Formatテキスト"
Range("A1").Select
ActiveSheet.PasteSpecial Format:="テキスト"
IE.Quit
Set IE = Nothing
End Sub

No.1 回答者： l3651s31io4 回答日時： 2014/07/31 16:14

うーん。

書き方が微妙すぎる！
ちゃんと理解していないのでは？

↓のサイトで基本を身につけてからがんばってみましょー
http://www.vba-ie.net/

この回答へのお礼

ご案内ありがとうございました。
ちゃんと理解できていませんし、案内された参考資料でも、単純には解決できそうにありません。
アプローチを変更してみたいと思います。

お礼日時：2014/08/16 19:43