如果我没有收到电子邮件，则在Outlook中生成警报

每天我必须收到一封电子邮件xyz。

如果我没有收到电子邮件，是否有任何Outlook插件（或其他工具）会收到警报？

如果您设置了过滤器以在收到消息时提醒您，甚至可能将其移动到特殊文件夹中，那么您还可以设置提醒您是否已收到您今天需要的电子邮件的提示。如果没有未读消息，您将有一个视觉指示器。

或者，根据您的Outlook版本，编写一个简单的vba脚本，以检查该特殊文件夹中是否有未读消息，这是预定事件。如果没有人提醒您。

假设您定期收到任何新邮件，则可以使用规则检查过去24小时内是否设置了“来自xyz的邮件”。否则，我看到的唯一选择是自定义Outlook加载项（或某些VBA宏），该加载项设置了一个每5（或任何）分钟关闭一次的计时器。

我认为这应该可以回答这个问题-我正在寻找类似的东西，因为我在工作中收到的电子邮件是在特定时间运行的，因此我一直在寻找一种方法来跟踪未到达我的东西收件箱。

没有收到消息时收到提醒？（由Diane Poremsky撰写）

基本上，它详细介绍了如何设置“运行脚本”规则，当您在指定的时间表内未收到电子邮件时会触发提醒。

实现此目的的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

我不知道执行您要求的插件。

您可以从创建规则开始。希望您所需要的电子邮件中包含可以用来可靠识别的内容。例如：它总是来自某个发件人，或者主题行中总是有某些文本。该规则可以将电子邮件移动到特定的文件夹，您可以在其中监视新的未读邮件。还有其他选项可以与移动电子邮件结合使用。