VBAでIEからソースコードを取得したい
昨日以降(0) 2日前以降(0) 3日前以降(0) 4日前以降(0) 5日前以降(0)
| Message#2 2014年10月4日(土)10時00分 From: 管理人 | 返事 削除 変更 |
| 検証はしていないので、憶測でなら。 まずデータ抜くだけなら、objIE.Visible = Trueは表示させなくてもいいかもですね。 表示に処理がかかるかもしれないので、objIE.Visible = Falseにされてはどうですか? あとは、InternetExplorerオブジェクトではなく、直接HTMLDocumentオブジェクトで取得する方法です。 Sub sample() Dim html As MSHTML.HTMLDocument Set html = New MSHTML.HTMLDocument Dim document As MSHTML.HTMLDocument Set document = html.createDocumentFromUrl("http://www.vba-ie.net/", vbNullString) Do While document.readyState <> "complete" DoEvents Loop Debug.Print document.body.innerHTML Set html = Nothing Set document = Nothing End Sub いずれにしても1万件を処理するとなればそれなりに時間がかかるので、処理専用のPCを用意するほうがいいかもしれません。 |
昨日以降 2日前以降 3日前以降 4日前以降 5日前以降
