- 帖子
- 115
- 主題
- 24
- 精華
- 0
- 積分
- 178
- 點名
- 0
- 作業系統
- WIN10
- 軟體版本
- Office2016
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2011-1-12
- 最後登錄
- 2024-11-15
|
請問 如果只想抓 網站上的部分資料 下來, VBA 要如何寫 ?- Sub 期貨交易口數()
- Set shFirstQtr = ActiveSheet
- Set qtQtrResults = shFirstQtr.QueryTables _
- .Add(Connection:="URL;http://www.taifex.com.tw/chinese/3/7_12_3_tbl.asp", _
- Destination:=shFirstQtr.Cells(3, 1))
- With qtQtrResults
- .WebFormatting = xlNone
- .WebSelectionType = xlSpecifiedTables
- .WebTables = "2"
- .Refresh
- End With
- End Sub
複製代碼 |
-
-
抓期貨口數.jpg
(124 KB)
期貨交易口數
|