NextReminderDate Property
Returns a Date that indicates the next time the specified reminder will occur. Read-only.
expression.NextReminderDate
*expression * Required. An expression that returns a **Reminder**object.
Remarks
The NextReminderDate property value changes every time the object's **Snooze**method is executed or when the user clicks the Snooze button.
Example
The following example creates a report of all reminders in the collection and the dates when they will next occur. The subroutine concatenates the **Caption**and NextReminderDate properties into a string and displays the string in a dialog box.
Sub DisplayNextDateReport()
'Displays the next time all reminders will be displayed.
Dim olApp As Outlook.Application
Dim objRems As Outlook.Reminders
Dim objRem As Outlook.Reminder
Dim strTitle As String
Dim strReport As String
Set olApp = New Outlook.Application
Set objRems = olApp.Reminders
strTitle = "Current Reminder Schedule:"
strReport = ""
'Check if any reminders exist.
If objRems.Count = 0 Then
MsgBox "There are no current reminders."
Else
For Each objRem In objRems
'Add information to string.
strReport = strReport & objRem.Caption & vbTab & _
objRem.NextReminderDate & vbCr
Next objRem
'Display report in dialog box
MsgBox strTitle & vbCr & vbCr & strReport
End If
End Sub
Applies to | Reminder Object
See Also | Dismiss Method | Reminder Event | Reminder Object | Reminders Collection