[算表] 用VBA抓網頁特定表格
軟體:excel
版本:2003
爬文之後還是對於抓網頁特定表格不太能完全掌握...
我打算抓這個網頁:
http://eb.sysnet.net.tw/finance/inc.php3?select=tfdata&id=1101#head
但是這個網頁看原始碼有三個page,我只需要一個值,
就是最底下(第三個大表格)的最新差額值(目前是-960)
http://farm3.static.flickr.com/2722/4121598899_cf71268f26_o.jpg
問題一:嘗試了以下的程式碼,但是傳不回任何東西....不知道問題出在哪...? ToT
問題二:原始碼有三頁的表格,不知道我要抓的表格編號是從第三個表頭開始數,
還是從第一個表格開始數呢....?
Sub 抓差額()
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://eb.sysnet.net.tw/finance/inc.php3?select=tfdata&id=1101#head",
Destination:=Range("B1"))
.WebFormatting = xlWebFormattingNone
.WebTables = "230"
.RefreshOnFileOpen = False
.BackgroundQuery = True
.SaveData = True
.RefreshPeriod = 0
.WebSelectionType = xlSpecifiedTables
End With
End Sub
--
我想隨便找個工作,隨便賺點錢,然後和不美又不醜的普通女人結婚;
生兩個小孩:第一個是女孩,第二個是男孩...
等長女結婚,兒子也能獨當一面的時候,就從工作退休...
之後...每天過著悠閒隱居生活,然後比自己的老婆還要早老死,
我就是想過這種生活,普普通通的過完一生....
§ 奈良鹿丸 §
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.132.132.5
※ 編輯: Uber 來自: 220.132.132.5 (11/21 23:57)
※ 編輯: Uber 來自: 220.132.132.5 (11/22 20:58)
推
08/06 23:46, , 1F
08/06 23:46, 1F
討論串 (同標題文章)