返回列表 上一主題 發帖

[程式分享] YesWin DDE下載台股資料至Excel

FAlonso

帖子
135 
主題
19 
精華
0 
積分
165 
點名
0  
作業系統
XP 
軟體版本
2003 
閱讀權限
20 
性別
男 
來自
香港 
註冊時間
2010-12-9 
最後登錄
2012-8-27 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2011-4-8 13:39 | 只看該作者

[程式分享] YesWin DDE下載台股資料至Excel

本帖最後由 FAlonso 於 2011-4-9 11:49 編輯

需要開YesWin才能執行
在sheet1 B1格子輸入台股編號,按Run Data鍵運行,Stop鍵停止程式運行,Clear清除成交價資料
大家可以在交易時段測試看看(股價延遲20分鐘)
程式如有錯誤或有改進意見,歡迎提出

Stock Info From YesWin (Version 1.0).rar (14.75 KB)
1

評分人數

收藏 分享
80 字節以內
不支持自定義 Discuz! 代碼

FAlonso

帖子
135 
主題
19 
精華
0 
積分
165 
點名
0  
作業系統
XP 
軟體版本
2003 
閱讀權限
20 
性別
男 
來自
香港 
註冊時間
2010-12-9 
最後登錄
2012-8-27 
2#
發表於 2011-4-17 19:20 | 只看該作者
Stock Info From YesWin (Version 1.0).rar (170.8 KB)
更新了的版本
(1) 在Sheet3利用外部資料匯入台灣股票交易所的資料,把一眾股票寫進該頁
(2) 利用userform把股票編號和名稱放入表內,Click sheet1 B1便顯示該userform, double click選擇該股票(編號),再run data便行了
(3) 幾項小修改,在圖表顯示股票名稱,退出excel前把所有DDE link刪除等
80 字節以內
不支持自定義 Discuz! 代碼

TOP

benjaminwhlee

帖子
9 
主題
2 
精華
0 
積分
50 
點名
0  
作業系統
xp 
軟體版本
office 2007 
閱讀權限
20 
性別
男 
來自
tt 
註冊時間
2011-5-30 
最後登錄
2011-9-7 
3#
發表於 2011-6-4 13:31 | 只看該作者
不知是否有辦法把yeswin中的分時價量表中的五檔資料匯出至Excel ?
煩請前輩們指點

TOP

FAlonso

帖子
135 
主題
19 
精華
0 
積分
165 
點名
0  
作業系統
XP 
軟體版本
2003 
閱讀權限
20 
性別
男 
來自
香港 
註冊時間
2010-12-9 
最後登錄
2012-8-27 
4#
發表於 2011-6-21 19:08 | 只看該作者
回復 3# benjaminwhlee
不明所指,但這個網頁或許有用
http://tw.myblog.yahoo.com/ys-blog/article?mid=1044
80 字節以內
不支持自定義 Discuz! 代碼

TOP

peter460191

帖子
163 
主題
27 
精華
0 
積分
193 
點名
0  
作業系統
winsows 10 
軟體版本
Office 2016 
閱讀權限
20 
性別
男 
註冊時間
2010-12-20 
最後登錄
2024-5-9 
5#
發表於 2011-9-30 11:58 | 只看該作者
回復 2# FAlonso

FAlonso 您太厲害了!

想請您指導一下，如只想要出現股票清單那個功能，且連股名一起出現，程式要如何寫，謝謝您！
peter460191

TOP

mannyhsu

帖子
19 
主題
1 
精華
0 
積分
26 
點名
0  
作業系統
windows7 
軟體版本
office2003 
閱讀權限
10 
性別
男 
註冊時間
2012-6-16 
最後登錄
2014-9-23 

論壇贊助勳章
6#
發表於 2012-6-21 00:52 | 只看該作者
DDE 耗費的資源太大, 可以改成 RTD 的方式試試看 ~~
manny

TOP

nikesam

帖子
1 
主題
0 
精華
0 
積分
6 
點名
0  
作業系統
winxp 
軟體版本
xp 
閱讀權限
10 
註冊時間
2013-8-15 
最後登錄
2019-7-27 
7#
發表於 2013-8-15 11:05 | 只看該作者
感謝您，可以試一試

TOP

owen06
　暱稱: 阿軒

中學生Rank: 2

帖子
396 
主題
12 
精華
0 
積分
425 
點名
1  
作業系統
Win10 
軟體版本
Office 2016 
閱讀權限
20 
性別
男 
來自
台中 
註冊時間
2013-7-2 
最後登錄
2024-8-23 

2015羊年全勤獎章2014馬年全勤獎章熱烈參與勳章
8#
發表於 2013-8-15 14:12 | 只看該作者
本帖最後由 owen06 於 2013-8-15 14:16 編輯

回復 7# nikesam

元大證券提供RTD的程式
http://www.yuanta.com.tw/yeswin/rtd/index.html

RTD的好處：
1.不必開YESWIN佔用系統資源
2.只要修改股票代號，所有連結資料都可同步連動

TOP

        靜思自在 : 【生命在呼吸間】佛陀說：「生命在呼吸間。」人無法管住自己的生命，更無法擋住死期，讓自己永住人間。既然生命去來這麼無常，我們更應該好好地愛惜它、利用它、充實它，讓這無常、寶貴的生命，散發它真善美的光輝，映照出生命真正的價值。
返回列表 上一主題