如何於EXCEL資料WEB查詢所查到7頁資料，一次下載到EXCEL?

excel

lin520 2015-03-31 15:14:11 ‧ 8289 瀏覽

分享至

於EXCEL資料從WEB查詢到總共7頁資料，用箭頭選所需要資料但每次只能匯入第一頁，如何可以選所需要頁數，或全布頁數，一次匯入到EXCEL?

看更多先前的討論...收起先前的討論...

外獅佬 iT邦大師 1 級 ‧ 2015-03-31 17:39:48 檢舉

這是什麼問題？

海綿寶寶 iT邦大神 1 級 ‧ 2015-03-31 19:23:11 檢舉

如果是不必登入的頁面
就可以試著用 VBA 去下載

lin520 iT邦新手 4 級 ‧ 2015-03-31 20:15:01 檢舉

請教如何寫VBA執行查詢？

海綿寶寶 iT邦大神 1 級 ‧ 2015-03-31 23:36:21 檢舉

以背包客棧為例
先用錄製巨集的方式匯入第一頁的表格
接著編輯 VBA
將匯入第一頁的程式碼複製成第二頁
並修改第二頁的網址(URL)及名稱(Name)
結果大致上像這樣

Sub Macro1()
   With ActiveSheet.QueryTables.Add(Connection:="URL;http://www.backpackers.com.tw/forum/forumdisplay.php?f=192", Destination:=Range("A1"))
      .Name = "page01"
      ...略...
   End With
   With ActiveSheet.QueryTables.Add(Connection:="URL;http://www.backpackers.com.tw/forum/forumdisplay.php?f=192&order=desc&page=2", Destination:=Range("A64"))
      .Name = "page02"
      ...略...
   End With
   With ActiveSheet.QueryTables.Add(Connection:="URL;http://www.backpackers.com.tw/forum/forumdisplay.php?f=192&order=desc&page=3", Destination:=Range("A127"))
      .Name = "page03"
      ...略...
   End With
End Sub

lin520 iT邦新手 4 級 ‧ 2015-04-01 09:21:59 檢舉

感恩！我會仔細詳讀，若有問題，再請教大師！

lin520 iT邦新手 4 級 ‧ 2015-04-01 10:08:02 檢舉

我按照您的步驟仍出現錯誤，我第一次寫VBA，我想下載Morningstar 基金類別資料共192筆分7頁，網址:http://tw.morningstar.com/ap/quickrank/CategoryReturns.aspx，能否
請您就該網址示範一次?感恩!

登入發表討論

直播研討會

{{ item.channelVendor }} {{ item.webinarstarted }} |

直播中

1 個回答

Ray

iT邦大神 1 級 ‧ 2015-03-31 18:53:21

最佳解答

這個叫做 Pagination, 如果不寫程式的話, 用 Excel 內建的功能做不到....

最接近的做法, 可以這樣試試看:
新增許多張 Sheet, 每個 Sheet 負責 Import 指定的 Web Page, 例如: Sheet1 就 Import 第一頁, Sheet2 第二頁...然後最後再做一張 Summary Sheet, 把每一頁的資料合併成一張大的 Sheet.

不過, 這若頁數少還可以, 頁數多的話, 光寫那個 Sheet 就昏倒了...

回應 5
分享
檢舉

看更多先前的回應...收起先前的回應...

lin520 iT邦新手 4 級 ‧ 2015-03-31 20:14:18 檢舉

請教如何於WEB查詢中製作(.iqy)把pagination加入，如何寫在(.iqy)裏？

lin520 iT邦新手 4 級 ‧ 2015-04-01 09:19:07 檢舉

請問我按照您的方式處理，但是仍然WEB查詢仍是page1，下面是網址：http://tw.morningstar.com/ap/quickrank/CategoryReturns.aspx，能否請大師開示？

lin520 iT邦新手 4 級 ‧ 2015-04-01 10:44:56 檢舉

請教大師，我繼續試，出現，該如何處理?

Ray iT邦大神 1 級 ‧ 2015-04-01 11:16:04 檢舉

lin520提到：
http://tw.morningstar.com/ap/quickrank/CategoryReturns.aspx

很不幸, 您這個網頁沒有辦法這樣做.....

若要用上面的方法做, 前提是: URL 上面要有分頁的資訊, 也就是每一頁的 URL 都不一樣; 但是您這個網頁是用 Javascript 程式去後端撈資料的, 所以每一頁的 URL 都相同, 這樣就沒有辦法用上述的方法來完成.

接下來就只能請人寫程式去撈了....

(ps. MorningStar 的資訊是要賣錢的, 你若付錢跟她買, 他每天都會自動為給你; 很顯然他們已經想到會有人沒付錢, 就想這樣來網站上撈資料, 所以一定做好很多預防的措施, 避免它們花錢買來的數據, 又被人家用自動化的程式給撈走....)

lin520 iT邦新手 4 級 ‧ 2015-04-01 11:31:16 檢舉

感恩！

登入發表回應

我要發表回答

立即登入回答

參賽組數

1064 組

團體組數

40 組

累計文章數

22207 篇

完賽人數

600 人

15th鐵人賽 16th鐵人賽 13th鐵人賽 14th鐵人賽 12th鐵人賽 11th鐵人賽鐵人賽 2019鐵人賽 javascript 2018鐵人賽 python 2017鐵人賽 windows php c# windows server linux css react vue.js

IT邦幫忙