สร้างการแจ้งเตือนใน Outlook หากฉันไม่ได้รับอีเมล

ทุกวันฉันต้องรับอีเมล xyz

มีปลั๊กอินสำหรับ Outlook (หรืออะไรก็ตาม) เพื่อรับการแจ้งเตือนหากฉันไม่ได้รับอีเมลหรือไม่

หากคุณตั้งค่าตัวกรองเพื่อเตือนคุณเมื่อคุณได้รับข้อความและอาจย้ายไปยังโฟลเดอร์พิเศษจากนั้นคุณสามารถตั้งตัวเตือนเพื่อถามคุณหากคุณได้รับอีเมลที่คุณต้องการในวันนี้ และคุณจะมีตัวบ่งชี้ภาพถ้าไม่มีข้อความที่ยังไม่ได้อ่าน

หรือขึ้นอยู่กับรุ่น outlook ของคุณเขียนสคริปต์ vba ง่าย ๆ เพื่อตรวจสอบโฟลเดอร์พิเศษสำหรับข้อความที่ยังไม่ได้อ่านว่าเป็นเหตุการณ์ที่กำหนด หากไม่มีใครแจ้งเตือนคุณ

สมมติว่าคุณได้รับการใด ๆข้อความใหม่เป็นประจำคุณสามารถใช้กฎระเบียบในการตรวจสอบว่าเป็น "มีจดหมายจาก xyz" ได้รับการติดตั้งในที่ผ่านมา 24 ชั่วโมง มิฉะนั้นทางเลือกเดียวที่ฉันเห็นคือ Add-in ของ 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

ฉันไม่รู้เกี่ยวกับปลั๊กอินที่ทำในสิ่งที่คุณถาม

คุณสามารถเริ่มต้นด้วยการสร้างกฎ หวังว่าอีเมลที่ต้องการมีบางสิ่งที่คุณสามารถใช้เพื่อระบุตัวตนได้อย่างน่าเชื่อถือ ตัวอย่างเช่น: มันมาจากผู้ส่งที่แน่นอนเสมอหรือมีข้อความบางอย่างในบรรทัดหัวเรื่องเสมอ กฎสามารถย้ายอีเมลไปยังโฟลเดอร์เฉพาะที่คุณสามารถดูข้อความใหม่ที่ยังไม่ได้อ่าน มีตัวเลือกอื่น ๆ สำหรับสิ่งที่ต้องทำที่สามารถใช้ร่วมกับการย้ายอีเมลได้