Excel VBA宏以在特定時間顯示消息

Question

這里的問題很簡單，有人可以告訴我為什么我早上顯示消息的代碼不起作用嗎？ 無法看到為什么它不起作用應該這么簡單！

Sub SetAlarm()
    Application.OnTime TimeValue"09:30:00", "DisplayAlarm"
End Sub

Sub DisplayAlarm()
    MsgBox "Good Morning"
End Sub

Answer 1

要盡可能少地更改當前代碼，您需要以某種方式運行Sub SetAlarm 。

因此，可以在其中一張紙上放置一個按鈕，然后為其分配Sub SetAlarm 。 或者，您可以使用下面的代碼，並在打開工作簿時添加它（只要它在9:30:00 AM之前）即可。

Private Sub Workbook_Open()
    SetAlarm    
End Sub

Answer 2

嘗試將Sub SetAlarm放入Workbook_Open()事件中（請在下面找到代碼）。 這樣，當您打開工作簿時，sub將自動觸發。 為了觸發Sub DisplayAlarm ，您的工作簿需要在指定時間打開。

Private Sub Workbook_Open()
    Application.OnTime "09:30:00", "DisplayAlarm"
End Sub