Тема: VBS: MS Outlook. Отметить задание как завершенное.
Добрый день.
В MS Outlook сделал повторяющееся событие, при наступлении которого автоматически выполняются определенные действия и оно автоматически отклоняется.
Проблема в том, что повторный запуск события при следующем наступлении времени его срабатывания не происходит из-за того что "висит" такое же задание в отклоненных, приходится в ручную завершать выполненное событие.
Отклоняю событие с помощью метода
.Dismiss
Ни в гугле, ни в документации по объекту Remind нужного мне метода не нашел...
Прошу помочь в поиске способа программно отметить задание как завешенное.
Текущий код:
Private Sub olRemind_BeforeReminderShow(Cancel As Boolean)
For Each objRem In olRemind
If objRem.Caption = "Событие" Then
If objRem.IsVisible Then
objRem.Dismiss
Cancel = True
End If
Exit For
End If
Next objRem