返回列表 上一主題 發帖

[發問] 請教要記錄1分K的開高低收,要如何更改?

回復 7# f3202

f32022大 不好意思 ~我只是小學生想要更了解這個一分鐘自動記錄是怎麼達到的,還不能下載附件檔!!不知道能不能截個圖讓我研究研究呢?拜託拜託!!

TOP

回復 11# 准提部林


想再請教大大  我是看國際期貨 所以想改他開收盤時間  假設我想開盤是下午6點 收盤是凌晨2點 不知道該怎麼改呢?謝謝:D

Sub 共用參照()
Set MyBook = ThisWorkbook
Set Sht1 = MyBook.Sheets("X2")
StartTime = "18:00:00"  '開盤時間(提早十秒開始,才可記錄開盤量價)"08:44:50"
EndTime = "02:00:00"    '收盤時間(延後十秒停止記錄)此為測試用時間,請自行更改正式時間 "13:45:10"
End Sub

Sub 自動記錄()
If uMode = 0 Then Exit Sub
If Time > TimeValue(EndTime) Then '收盤時間以後不執行
    Sht1.[O8] = "執行中"
    uMode = 0
    Exit Sub
End If

TOP

非常感謝准提部林大大
可以正常使用了
謝謝~

TOP

        靜思自在 : 世上有兩件事不能等:一、孝順 二、行善。
返回列表 上一主題