標題: 用EXCEL VBA紀錄每秒鐘記錄數值跳動的巨集 [打印本頁]

---

作者: hom770706    時間: 2018-7-25 20:48     標題: 用EXCEL VBA紀錄每秒鐘記錄數值跳動的巨集

本帖最後由 hom770706 於 2018-7-25 20:49 編輯

大家好

我是完全沒有程式背景的新手
最近開始研究股票以及想用Excel紀錄當下的一些數值
方便盤後分析和研究

由於完全沒有背景
所以參考網上找到的程式碼加以修改欄位或格式
但發現都跑不出來

目前希望以秒為單位
分別記錄下當時的幾個數值(如圖所示)
[attach]29066[/attach][attach]29066[/attach]

而跳動的數據則是在工作表1中的B4, B10 以及N13
參考的程式碼修改後(只先試著放入一個數據)

1. Sub Schedule()
   
2. DoEvents
   
3. If Sheet2.Cells("A2") = 1 Then '當這個欄位值為1的時候開始紀錄
   
4.     Call record               
   
5.     Call timer_Start         
   
6. End If
   
7. End Sub
   
8. 
   
9. Sub timer_Start()
   
10. Application.OnTime Now + TimeValue("00:00:01"), "Schedule", Schedule:=True
    
11. End Sub
    
12. 
    
13. Sub timer_Stop()
    
14. On Error Resume Next
    
15. Application.OnTime Now + TimeValue("00:00:01"), "Schedule", Schedule:=False
    
16. End Sub
    
17. 
    
18. Sub record()
    
19. Sheet2.Cells("B2") = Sheet2.Cells("B2") + 1
    
20. Sheet2.Cells(Sheet2.Cells("B2"), 3) = Sheet1.Cells("B10")
    
21. End Sub

複製代碼

還請各位大大不吝指教
或請大大指導有哪方面的書籍或網站可以查詢和學習
萬分感謝

---

作者: Scott090    時間: 2018-7-27 06:33

回復 1# hom770706


    建議大大把實際的東西附檔，論壇內想幫的會比較有方向感
股票相關跳動tick紀錄的討論應該也有，建議搜尋看看

---

作者: c_c_lai    時間: 2018-7-27 07:14

回復 1# hom770706
多多去參考別人的寫作及吸取他人的思路，
如此才會有更寬廣的自我平台。
參考看看是否如你需求。
盤中 DDE 存檔與 VBA 的實際應用範例

---

作者: samsung2888    時間: 2018-7-28 08:53

盤後分析沒有用,只有在盤中檢討自已的交易才會進步
研究行情卻不是研究自已已經走偏了

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)