Создать оповещение в Outlook, если я не получаю электронное письмо

Question

Каждый день я должен получать по электронной почте XYZ.

Есть ли какой-нибудь плагин для Outlook (или любой другой), чтобы получать оповещения, если я не получаю электронное письмо?

Answer 1

Если вы установили фильтр для оповещения о получении сообщения и, возможно, даже переместите его в специальную папку, вы также можете установить напоминание, чтобы спросить вас, получили ли вы нужное письмо сегодня. И у вас будет визуальный индикатор, если нет непрочитанного сообщения.

ИЛИ, в зависимости от версии Outlook, напишите простой скрипт vba, чтобы проверить эту специальную папку на наличие непрочитанного сообщения как запланированного события. Если нет ни одного предупреждения.

Answer 2

Предполагая, что вы получаете любое новое сообщение на регулярной основе, вы можете использовать правила, чтобы проверить, было ли "получено письмо от xyz" за последние 24 часа. В противном случае единственная альтернатива, которую я вижу, это пользовательская надстройка Outlook (или некоторые макросы VBA), которая устанавливает таймер, который срабатывает каждые 5 (или что-то еще) минут.

Answer 3

Я думаю, что это должно ответить на вопрос - я искал что-то похожее, так как в своей работе я получал много электронных писем от процессов, которые выполнялись в определенное время, и искал способ отследить все, что не пришло мне в голову. Входящие, когда предполагается.

Получать напоминание, когда сообщение не приходит? (автор Дайан Поремски)

В основном, это подробно о том, как установить правило "запуска скрипта", которое вызывает напоминание, когда вы не получаете электронное письмо в течение указанного графика.

Код VB для достижения этой цели следующий:

Sub RemindNewMessages(Item As Outlook.MailItem)

Dim objInbox As Outlook.MAPIFolder
Dim intCount As Integer
Dim objVariant As Variant

Set objInbox = Session.GetDefaultFolder(olFolderInbox)

' Set the flag/reminder on newly arrived message
 With Item
    .MarkAsTask olMarkThisWeek
    .TaskDueDate = Now + 1
    .ReminderSet = True
    ' Reminder in one hour
    .ReminderTime = Now + 0.041
    .Categories = "Remind in 1 Hour"
    .Save
End With

Item.Save

' look for existing messages and remove the flag and reminder 
For intCount = objInbox.Items.Count To 1 Step -1
 Set objVariant = objInbox.Items.Item(intCount)

 If objVariant.MessageClass = "IPM.Note" Then
    If LCase(objVariant.Subject) = LCase(Item.Subject) And objVariant.SentOn < Item.SentOn Then
' clear flag and category
With objVariant
    .ClearTaskFlag
    .Categories = ""
    .Save
End With

'or just delete the older messages
   '  objVariant.Delete
     Else
    End If
 End If
Next

Set objInbox = Nothing
End Sub

Answer 4

Я не знаю о плагинах, которые делают то, что вы просите.

Вы можете начать с создания правила. Надеемся, что в электронном письме есть что-то, что вы можете использовать для надежной идентификации. Например: он всегда исходит от определенного отправителя или всегда содержит определенный текст в строке темы. Правило может перемещать электронную почту в определенную папку, в которой вы можете наблюдать за новым непрочитанным сообщением. Существуют и другие варианты действий, которые можно комбинировать с перемещением электронной почты.