1

Тема: 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