NextReminderDate Property

Microsoft Outlook Visual Basic

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 Reminders
    Dim objRem As Reminder
    Dim strTitle As String
    Dim strReport As String

    Set olApp = Outlook.Application
    Set objRems = olApp.Reminders

    strTitle = "Current Reminder Schedule:"
    'Check if any reminders exist
    If objRems.Count = 0 Then
        MsgBox "There are no current reminders."
    Else
        For Each objRem In objRems
            'If string is empty, create new string
            If strReport = "" Then
                strReport = objRem.Caption & vbTab & _
                            objRem.NextReminderDate & vbCr
            Else
                'Add info to string
                strReport = strReport & objRem.Caption & vbTab & _
                            objRem.NextReminderDate & vbCr
            End If
        Next objRem
        'Display report in dialog
        MsgBox strTitle & vbCr & vbCr & strReport
    End If

End Sub