NextReminderDate Property

Microsoft Outlook Visual Basic

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