12
返回列表 上一主題 發帖

[發問] 上市個股日成交資訊下載改版建議

t8899

帖子
766 
主題
256 
精華
0 
積分
1035 
點名
0  
作業系統
windows 11 
軟體版本
OFFICE2021 
閱讀權限
50 
性別
男 
註冊時間
2011-5-30 
最後登錄
2026-8-2 
11# 跳轉到 »
發表於 2017-6-22 18:36 | 顯示全部帖子
回復  t8899
joey0415 發表於 2017-6-22 18:29

可以按照日期由小到大排序嗎?

TOP

t8899

帖子
766 
主題
256 
精華
0 
積分
1035 
點名
0  
作業系統
windows 11 
軟體版本
OFFICE2021 
閱讀權限
50 
性別
男 
註冊時間
2011-5-30 
最後登錄
2026-8-2 
12#
發表於 2017-6-24 06:06 | 顯示全部帖子
回復  t8899

都可以自己載入excel

自已錄製一下排序應該很簡單

練習看看
joey0415 發表於 2017-6-22 18:37


請教連接時等4秒如果沒回應就跳出，要如何改??
  Application.ScreenUpdating = False
    Sheets("Sheet5").Select
Cells.ClearContents
ddd = "URL;http://www.twse.com.tw/exchangeReport/TWT48U?response=html"
With ActiveSheet.QueryTables.Add(Connection:=ddd, Destination:=Range("$A$1"))
.WebTables = "1"
.Refresh BackgroundQuery:=False
End With

TOP

        靜思自在 : 生氣，就是拿別人的過錯來懲罰自己。
12
返回列表 上一主題