Reminder.Dismiss Method (Outlook)
Dismisses the current reminder.
Syntax
expression .Dismiss
expression A variable that represents a Reminder object.
Remarks
The Dismiss method will fail if there is no visible reminder.
Example
The following example dismisses all active reminders. A reminder is active if its IsVisible property is set to True.
Sub DismissReminders()
'Dismisses any active reminders.
Dim objRems As Outlook.Reminders
Dim objRem As Outlook.Reminder
Dim i As Integer
Set objRems = Application.Reminders
For i = objRems.Count To 1 Step -1
If objRems(i).IsVisible = True Then
objRems(i).Dismiss
End If
Next
Set olApp = Nothing
Set objRems = Nothing
Set objRem = Nothing
End Sub