Reminder.Dismiss 方法 (Outlook)
解除目前提醒。
語法
expression。 Dismiss
表達 代表 Reminder 物件的變數。
註解
如果沒有可見的提醒,Dismiss 方法將會失敗。
範例
下列範例會解除所有使用中的提醒。 如果提醒的 IsVisible 屬性設定為 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
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。