用EXCEL VBA紀錄每秒鐘記錄數值跳動的巨集

hom770706

大家好

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

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

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

下載 (49.67 KB)

2018-7-25 20:43

而跳動的數據則是在工作表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

回復 1# hom770706


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

c_c_lai

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

samsung2888

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