Поделиться через

Метод Reminder.Dismiss (Outlook)

  • Статья

Закрывает текущее напоминание.

Синтаксис

выражение. 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 и обратная связь.