Date Functions VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Date Functions
  4. Use the OnTime method to run a VBA procedure on a particular day
Sub Main()
Application.OnTime DateValue("12/31/2007 5:00 pm"), "DisplayAlarm"
End Sub
Sub DisplayAlarm()
    Beep
    MsgBox "Wake up. It's time for your afternoon break!"
End Sub