本帖最後由 t8899 於 2024-7-24 10:12 編輯
Worksheet_Calculate 無法正確執行 ?
Private Sub Worksheet_Calculate()
If Format(Now, "hh:mm:ss") = "10:03:00" Then
MsgBoxTest 0, " test 4秒自動關閉 ", "提示訊息", vbSystemModal, 0, 4000
End If
If Format(Now, "hh:mm:ss") = "10:03:02" Then '
[m21] = 1
End If
end sub
10:03:00 出現的提示視窗會停4秒才關閉，這會導致10:03:02的 [m21] = 1沒被執行? 如何解決 ?(條件時間不能更改) |
發表於 2024-7-24 10:10
| 
