This procedure uses the Click event to call CreateItem to create and show an appointment when a user clicks CommandButton1.
In design mode:
How?
How?
Sub CommandButton1_Click
Application.CreateItem(1).Display
End Sub
| Type of item | Has the value |
|---|---|
| MailItem | 0 |
| AppointmentItem | 1 |
| ContactItem | 2 |
| TaskItem | 3 |
| JournalItem | 4 |
| NoteItem | 5 |
| PostItem | 6 |
| DistListItem | 7 |