想請教各位前輩!!
某網頁有張大表,表頭有下拉式選單可以選年份,
選定年份後,再重整,表的內容就會變成指定年度的資料。
本來是打算逐年一一匯入excel裡面,
但發現,不管我指定哪一個年份,
匯入的永遠都是最新的2013,
就算是在匯入過程中,在指定表格的視窗裡,重新指定年份重整,
一但按匯入,還是一樣只匯到最新的2013。
請問有解嗎????
爆肝工程師 wrote:
有網頁嗎?如果是免費...(恕刪)
是公開資料,沒問題的
可是網頁資料跟投資理財一點關係都沒有....
只是想說這裡比較多人在討論相關問題.........
Orz.....
http://edw.epa.gov.tw/resultWasteFac.aspx?facid=81676
我是要把最下面那張表的資料,用web匯入excel.....
可以的話,
麻煩爆哥幫忙試試了..........
感恩!!
記得要先引用Microsoft HTML Object和Microsoft Internet Controls
簡單範例如下:
Sub Test()
Set ie = CreateObject("internetexplorer.application")
ie.Visible = True
ie.navigate "http://edw.epa.gov.tw/resultWasteFac.aspx?facid=81676"
While ie.busy
DoEvents
Wend
以上是開IE視窗
ie.document.getElementById("DropDownListDate").Value = 2012
Set htmlColl = ie.document.getElementsByTagName("input")
For Each htmlInput In htmlColl
If Trim(htmlInput.Value) = "營運資料" Then
htmlInput.Click
Exit For
End If
Next htmlInput
End Sub
以上是把年度改成2012,這部份可以自行修改
後面的程式碼就是按營運資料那個按鈕
再寫些小程式把表格貼到Excel就行囉!
內文搜尋

X