Application VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Application
  4. Using the Startup Event
Sub Application_Startup()
    Dim myNoteItem As NoteItem
    Set myNoteItem = Application.CreateItem(ItemType:=olNoteItem)
    myNoteItem.Body = "Please start a new time card for the day."
    myNoteItem.Display
End Sub