返回列表 上一主題 發帖

該如何取消巨集???

回復 1# color790
可詳看VBA 說明:  OnTime方法
  1. Option Explicit
  2. Dim S As Date
  3. Sub abc()
  4.     S = Now + 0.0001   '時間
  5.     Application.OnTime S, "ddd"
  6. End Sub
  7. Sub ddd()
  8.     MsgBox "AAA"
  9.     Beep
  10. End Sub
  11. Sub OnTime_Cancel()  'S 時間之前 取消程式
  12.     Application.OnTime S, "ddd", , False
  13. End Sub
複製代碼

TOP

回復 7# color790
執行 UserForm1 看看

TOP

回復 9# color790
重新下載看看

TOP

        靜思自在 : 唯其尊重自己的人,才更勇於縮小自己。
返回列表 上一主題