Private Sub expression_ReminderAdd(ByVal ReminderObject As Reminder)
expression A variable which references an object of type Reminders declared with events in a class module.
ReminderObject Required. The Reminder object added to the collection.
A reminder is not actually created until the associated Microsoft Outlook item has been saved. Therefore, this event will not occur until the associated item object has been saved.
The following example displays the date of the next reminder when a reminder is added to the collection.
Public WithEvents objReminders As Outlook.Reminders Sub Initialize_handler() Set objReminders = Application.Reminders End Sub Private Sub objReminders_ReminderAdd(ByVal ReminderObject As Reminder) 'Occurs when a Reminder object is added to the collection using the user interface or object model MsgBox "A new reminder is added that will fire at: " & _ ReminderObject.NextReminderDate End Sub