Edit

Reminder.OriginalReminderDate property (Outlook)

  • Article

Returns a Date that specifies the original date and time that the specified reminder is set to occur. Read-only.

Syntax

expression. OriginalReminderDate

expression A variable that represents a Reminder object.

Remarks

This value corresponds to the original date and time value before the Snooze method is executed or the user clicks the Snooze button.

Example

The following Microsoft Visual Basic for Applications (VBA) example creates a report of all reminders in the Reminders collection and the dates at which they are scheduled to occur. The subroutine concatenates the Caption and OriginalReminderDate properties of all Reminder objects in the collection into a string and displays the string in a dialog box.

Sub DisplayOriginalDateReport() 
 
 'Displays the time at which all reminders will be displayed. 
 
 Dim objRems As Outlook.Reminders 
 
 Dim objRem As Outlook.Reminder 
 
 Dim strTitle As String 
 
 Dim strReport As String 
 
 
 
 Set objRems = Application.Reminders 
 
 strTitle = "Original 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 info to string 
 
 strReport = strReport & objRem.Caption & vbTab & vbTab & _ 
 
 objRem.OriginalReminderDate & vbCr 
 
 Next objRem 
 
 'Display report in dialog 
 
 MsgBox strTitle & vbCr & vbCr & strReport 
 
 End If 
 
End Sub

See also

Reminder Object

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.