QueryTables重複查詢，如何覆蓋上一筆查詢
暱稱: joey0415
中學生
- 帖子
- 361
- 主題
- 57
- 精華
- 0
- 積分
- 426
- 點名
- 0
- 作業系統
- win7
- 軟體版本
- 2003,2010
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2010-5-13
- 最後登錄
- 2022-12-8
|
- Sub ex()
- Range("A:L").Clear
- With ActiveSheet.QueryTables.Add(Connection:="URL;https://tw.finance.yahoo.com/q/q?s=" & 1101, Destination:=Range("A1"))
- .WebSelectionType = xlSpecifiedTables
- .WebFormatting = xlWebFormattingNone
- .WebTables = "6"
- .Refresh BackgroundQuery:=False
- .Delete
- End With
- End Sub
|
|
|
|
|
|
|
|
發表於 2015-2-26 18:49
| 