帖子: 102
主題: 14
精華: 0
積分: 142
點名: 0
作業系統: Win10
軟體版本: Office2016
閱讀權限: 20
性別: 男
註冊時間: 2016-7-31
最後登錄: 2020-3-21

論壇贊助勳章

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2016-8-3 11:07 | 只看該作者

[原創] 上市櫃三大法人買賣超日報資料彙整處理

這是小弟我做的上市櫃三大法人買賣超日報資料彙整
不過需要每天去證交所和櫃買中心下載買賣超日報和盤後的價格資料(有人可以改寫自動下載功能並分享的話，小弟我將五體投地佩服至極xD)
例如:上櫃法人買賣超的檔名是SQUO*......
批量匯入或單日更新的資料夾位置也要自行去看我的程式碼做更改xD
不過這是半成品，所以還需要大家的珍貴意見，任何能讓程式加速或更多功能的方法之類的...小弟還要多跟版上高手學習^^
進一步的資料分析功能還沒做，只有做簡單的測試功能
1.法人連買幾日
2.法人區間內買超天數達幾日以上...
大家就自行發揮創意改程式碼再上來分享給吧~~~
感謝各位高手為我解惑，在此將小弟的新手作品貢獻給大家使用~~
也感謝管理群的拔擢與信賴!!!

上市櫃三大法人買賣超.zip (841.44 KB)

樓主熱帖

joey0415

　暱稱: joey0415

中學生 Rank: 2

帖子: 361
主題: 57
精華: 0
積分: 426
點名: 0
作業系統: win7
軟體版本: 2003,2010
閱讀權限: 20
性別: 男
註冊時間: 2010-5-13
最後登錄: 2022-12-8

2^#

發表於 2016-8-4 08:49 | 只看該作者

回復 1# VBALearner
如果只計算二三十天，這樣放沒有問題

如果要計算一二年，可能要放直立式的，透過sql語法，放進簡單的資料庫如access sqlite等，容量大速度快

excel只是下命令與最後資料呈現的地方，讓資料庫自行運算

速度超快

參考看看

例如以下圖片，如果會下指令，可以查出某時間內，外資共買幾次，佔股本多少等，格式建立好，會查多少就看你sql功力

TOP

VBALearner

中學生 Rank: 2

帖子: 102
主題: 14
精華: 0
積分: 142
點名: 0
作業系統: Win10
軟體版本: Office2016
閱讀權限: 20
性別: 男
註冊時間: 2016-7-31
最後登錄: 2020-3-21

論壇贊助勳章

3^#

發表於 2016-8-4 10:22 | 只看該作者

本帖最後由 VBALearner 於 2016-8-4 10:25 編輯

回復 2# joey0415

哇......您高手專業...但是我不會寫...sql這個語言?! 不過Access倒是有，他也是用VBA就能操作的沒錯吧? 這樣好像是Access比較容易上手的感覺...
可以請教您在哪裡學習資料庫的程式語言嗎?! 您的法人資料庫附圖應該就是您的大作吧XD?
我再去市面上翻幾本Access的書看看，謝謝您的意見

TOP

joey0415

　暱稱: joey0415

中學生 Rank: 2

帖子: 361
主題: 57
精華: 0
積分: 426
點名: 0
作業系統: win7
軟體版本: 2003,2010
閱讀權限: 20
性別: 男
註冊時間: 2010-5-13
最後登錄: 2022-12-8

4^#

發表於 2016-8-4 14:17 | 只看該作者

本帖最後由 joey0415 於 2016-8-4 14:18 編輯

回復 3# VBALearner

幾萬筆或幾百萬筆資料的整合，放資料庫才是正確

透過excel vba 操作資料庫並使用sql語法來選取你要的資料才是正確

真的快又有效

sql語法教學

http://www.1keydata.com/tw/sql/sql.html

excel vba connect access 教學
http://tgw1029.blogspot.tw/2010/01/excel-vba-adoaccess_06.html

http://blog.xuite.net/crdotlin/excel/9056917-Access%E8%B3%87%E6%96%99%E5%BA%AB%E7%9A%84%E9%80%A3%E7%B5%90

http://tgw1029.blogspot.tw/2010/01/excel-vba-adoaccess.html

影音教學

https://www.youtube.com/results?search_query=excel+vba+connect+access

TOP

PKKO

　暱稱: PKKO

高中生 Rank: 3 Rank: 3

帖子: 549
主題: 152
精華: 0
積分: 691
點名: 0
作業系統: WIN7
軟體版本: OFFICE 2010
閱讀權限: 50
性別: 男
註冊時間: 2013-8-10
最後登錄: 2022-9-7

論壇榮譽勳章論壇贊助勳章

5^#

發表於 2016-8-4 14:30 | 只看該作者

回復 3# VBALearner

您的程式碼只有整理資料的部分
主要下載資料的程式碼,你的Myfile 沒有提供，恐怕網友們無法學習如何下載哦!
Workbooks.Open "C:\三大法人更新區\" & myfile

PKKO

TOP

VBALearner

中學生 Rank: 2

帖子: 102
主題: 14
精華: 0
積分: 142
點名: 0
作業系統: Win10
軟體版本: Office2016
閱讀權限: 20
性別: 男
註冊時間: 2016-7-31
最後登錄: 2020-3-21

論壇贊助勳章

6^#

發表於 2016-8-4 15:24 | 只看該作者

本帖最後由 VBALearner 於 2016-8-4 15:26 編輯

回復 5# PKKO

我的程式碼裡有一段
myfile = Dir("C:\三大法人更新區\201*")
可以從C槽的三大法人更新區資料夾取出XXX開頭的Excel檔檔名作為資料來源"myfile"
不過無法自動下載就是了，要手動下載後把檔案移到C槽更新資料夾裡，還是您願意分享如何從網頁上自動下載檔案OwO?!

TOP

VBALearner