想要利用vba抓動態網頁資料,有沒有方法可以讓網頁設定好下拉式選單,再進去撈資料。
- 帖子
- 6
- 主題
- 2
- 精華
- 0
- 積分
- 8
- 點名
- 0
- 作業系統
- win7
- 軟體版本
- office 2010
- 閱讀權限
- 10
- 性別
- 男
- 註冊時間
- 2017-5-20
- 最後登錄
- 2017-10-31
|
想要利用vba抓動態網頁資料,有沒有方法可以讓網頁設定好下拉式選單,再進去撈資料。
想要利用vba抓動態網頁資料,有沒有方法可以讓網頁Show entries設定為"100",再進去撈資料。- Sub test()
- x = Timer
- Dim ie As Object
- Set ie = CreateObject("InternetExplorer.Application")
-
- u = "網址"
- ie.navigate u
- ie.Visible = True
-
- Do
- DoEvents
- Loop Until ie.readyState = READYSTATE_COMPLETE
- Dim doc As HTMLDocument
- Set doc = ie.document
-
- Application.Wait (Now + TimeValue("0:00:03"))
- On Error Resume Next
- For i = 0 To 30
- Worksheets("I").Range("I" & i + 3) = doc.getElementsByClassName("R10 dataTable")(0).getElementsByTagName("td")(i * 6 + 1).innerText
- Next i
- ie.Quit '關畢ie
- End Sub
複製代碼 |
|
|
|
|
|
|
- 帖子
- 6
- 主題
- 2
- 精華
- 0
- 積分
- 8
- 點名
- 0
- 作業系統
- win7
- 軟體版本
- office 2010
- 閱讀權限
- 10
- 性別
- 男
- 註冊時間
- 2017-5-20
- 最後登錄
- 2017-10-31
|
2#
發表於 2017-10-30 23:52
| 只看該作者
|
|
|
|
|
|