- 帖子
- 40
- 主題
- 10
- 精華
- 0
- 積分
- 83
- 點名
- 0
- 作業系統
- winxp
- 軟體版本
- office2003
- 閱讀權限
- 20
- 註冊時間
- 2011-6-3
- 最後登錄
- 2020-10-1
|
請匯入網頁問題?
請問匯入時股票名稱無法匯入為什麼?謝謝大大...
Sub TEST()
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://toptrade.moneydj.com/z/ze/zeb/zeb.djhtm", Destination:=Range( _
"O1"))
.AdjustColumnWidth = False
.WebFormatting = xlWebFormattingNone
.WebDisableDateRecognition = True
.Refresh BackgroundQuery:=False
End With
End Sub |
|
發表於 2011-11-16 09:05
| 
發表於 2011-11-16 20:55
| 
