将提醒延迟一定的时间。相当于用户单击“暂停”按钮。
expression.Snooze(SnoozeTime)
expression 必选。该表达式返回 Reminder 对象。
SnoozeTime 可选,Variant 类型。指明提醒延迟的时间(以分钟计)。默认值为 5 分钟。
如果当前提醒不处于活动状态,该方法将执行失败。
以下示例将所有活动提醒延迟指定的时间。
Sub SnoozeReminders()
'Delays all reminders by a specified amount of time
    Dim olApp As Outlook.Application
    Dim objRems As Reminders
    Dim objRem As Reminder
    Dim varTime As Variant
    Set olApp = Outlook.Application
    Set objRems = olApp.Reminders
    varTime = InputBox("Enter the number of minutes to delay")
    For Each objRem In objRems
        If objRem.IsVisible = True Then
            objRem.Snooze (varTime)
        End If
    Next objRem
End Sub