- 締切済み
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
- みんなの回答 (1)
- 専門家の回答
みんなの回答
- l3651s31io4
- ベストアンサー率0% (0/3)
うーん。 書き方が微妙すぎる! ちゃんと理解していないのでは? ↓のサイトで基本を身につけてからがんばってみましょー http://www.vba-ie.net/
お礼
ご案内ありがとうございました。 ちゃんと理解できていませんし、案内された参考資料でも、単純には解決できそうにありません。 アプローチを変更してみたいと思います。