- 帖子
- 5923
- 主題
- 13
- 精華
- 1
- 積分
- 5986
- 點名
- 0
- 作業系統
- win10
- 軟體版本
- Office 2010
- 閱讀權限
- 150
- 性別
- 男
- 來自
- 台灣基隆
- 註冊時間
- 2010-5-1
- 最後登錄
- 2022-1-23
        
|
回復 20# andylin
謝謝你的圖檔 隔行如隔山,我完全看不懂.哈....
若明日8:45am開盤前 我開起此excel檔後 我是否需要自己手動將excel欄位裡今日的數據全delete掉?
答案在這裡
Private Sub Workbook_Open() '此程式是檔案開啟時自動執行的程式
Dim E As Range
If MsgBox("啟動自動記錄資料??", vbYesNo) = vbNo Then Exit Sub '按 Yes 會依序清除昨日資料 按 No 離開程式
Sheets("1分K").UsedRange.Offset(1, 1) = "" ' 清除昨日資料delete掉
Sheets("5分K").UsedRange.Offset(1, 1) = "" ' 清除昨日資料 delete掉
Sheets("15分K").UsedRange.Offset(1, 1) = "" ' 清除昨日資料delete掉
|
|