Snooze 方法

       

将提醒延迟一定的时间。相当于用户单击“暂停”按钮。

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