Wygeneruj alert w programie Outlook, jeśli nie otrzymam wiadomości e-mail

Codziennie muszę otrzymywać e-mail xyz.

Czy jest jakaś wtyczka do programu Outlook (lub cokolwiek innego), aby otrzymywać powiadomienia, jeśli nie otrzymam wiadomości e-mail?

Jeśli ustawisz filtr ostrzegający o otrzymaniu wiadomości, a może nawet przeniesiesz go do specjalnego folderu, możesz również ustawić przypomnienie, aby zapytać, czy otrzymałeś wiadomość e-mail, której potrzebujesz dzisiaj. I masz wskaźnik wizualny, jeśli nie ma nieprzeczytanej wiadomości.

LUB w zależności od wersji programu Outlook, napisz prosty skrypt VBA, aby sprawdzić, czy w specjalnym folderze nie ma nieprzeczytanej wiadomości jako zaplanowane wydarzenie. Jeśli nie ma jednego ostrzeżenia.

Zakładając, że masz żadnej nowej wiadomości w regularnych odstępach czasu, można użyć reguły, by sprawdzić, że „got mail z xyz” został ustawiony w ciągu ostatnich 24 godzin. W przeciwnym razie jedyną alternatywą, jaką widzę, jest niestandardowy dodatek do programu Outlook (lub niektóre makra VBA), który ustawia licznik czasu, który jest wyłączany co 5 (lub cokolwiek) minut.

Myślę, że to powinno odpowiedzieć na pytanie - szukałem czegoś podobnego, ponieważ w mojej pracy otrzymuję wiele e-maili z procesów uruchomionych w określonych czasach i szukałem sposobu, aby śledzić wszystko, co nie przyszło do mnie skrzynka odbiorcza, kiedy należy.

Otrzymasz przypomnienie, gdy wiadomość nie dotrze? (napisane przez Diane Poremsky)

Zasadniczo zawiera szczegółowe informacje na temat ustawiania reguły „uruchom skrypt”, która wyzwala przypomnienie, gdy nie otrzymasz wiadomości e-mail w określonym terminie.

Aby to osiągnąć, kod VB jest następujący:

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

Nie wiem o wtyczkach, które robią to, o co prosisz.

Możesz zacząć od utworzenia reguły. Mamy nadzieję, że w wymaganym e-mailu jest coś, czego można użyć do niezawodnej identyfikacji. Na przykład: zawsze pochodzi od określonego nadawcy lub zawsze ma określony tekst w temacie. Reguła może przenieść wiadomość e-mail do określonego folderu, w którym można obserwować nową, nieprzeczytaną wiadomość. Istnieją inne opcje, które można połączyć z przenoszeniem wiadomości e-mail.