+ Reply to Thread
Results 1 to 3 of 3

Need Notification of Daily Email Not Received

Hybrid View

  1. #1
    Registered User
    Join Date
    07-10-2013
    Location
    Memphis, TN
    MS-Off Ver
    Excel 2010
    Posts
    34

    Need Notification of Daily Email Not Received

    I hope this is the correct forum.

    I receive daily Outlook emails from an address called "OnQ Reports" and a portion of the subject contains "Daily OnQ Reports". I have a rule created to move these emails to a certain folder because no action is required by me. However, other people copied on the email must respond.

    When we have an Outlook service interruption, these emails may not get sent to us. I need some kind of notification to let me know when this daily email was not received.

    Any suggestions? I don't believe Outlook "rules" can help me.

    Thanks,

    Debbie

  2. #2
    Forum Contributor
    Join Date
    08-27-2006
    Posts
    136

    Re: Need Notification of Daily Email Not Received

    You will have to try some VBA

    ' 1 - Set up a recurring task with subject OnQReports
    '      with a reminder set later than the mail is expected
    '
    ' 2 - Put this code in ThisOutlookSession
    
    Private Sub Application_Reminder(ByVal Item As Object)
    
    If Item.Class = olTask Then
        If InStr(Item.Subject, "OnQReports") > 0 Then
            ReminderUnreceivedMail_OnQReports
        End If
    End If
    
    End Sub
    
    ' 3 - Put this code in a regular module. 
    '      To make it simpler,
    '      this code may go in the ThisOutlookSession module.
    '
    ' In normal use the reminder should trigger this code
    ' You may run this manually to test if it works
    
    Private Sub ReminderUnreceivedMail_OnQReports()
    
    Dim itms As Items
    
    ' The folder name is OnQReports. It is one level below the Inbox
    ' If the folder is at another level add more of
    '   .Folders("SubfolderNameX")
    ' Set itms = GetNamespace("MAPI").GetDefaultFolder(olFolderInbox).Folders("SubfolderName1").Folders("OnQReports").Items
    
    Set itms = GetNamespace("MAPI").GetDefaultFolder(olFolderInbox).Folders("OnQReports").Items
    
    Set itms = itms.Restrict("[SentOn] > '" & Format(Date, "yyyy-mm-dd") & "'")
    
    If itms.count = 0 Then
        MsgBox "Warning. No email today " & Format(Date, "yyyy-mm-dd")
    Else
        MsgBox "Email received today " & Format(Date, "yyyy-mm-dd")
    End If
    
    Set itms = Nothing
    
    End Sub
    If you are not familiar with VBA this may prove helpful. http://www.slipstick.com/developer/h...ks-vba-editor/
    To mark "Solved" go to Thread Tools.

  3. #3
    Registered User
    Join Date
    07-10-2013
    Location
    Memphis, TN
    MS-Off Ver
    Excel 2010
    Posts
    34

    Re: Need Notification of Daily Email Not Received

    Thanks for the quick reply, skatonni! I was off work for a few days so I can't work on this right away, plus it may take me a little time to figure out (I am slightly familiar with VBA). I will let you know as soon as I'm able to work on it.

    Thanks again!

+ Reply to Thread

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Send New Email W/ Body of Received Email, Then Delete Sent Email
    By edneal2 in forum Outlook Formatting & Functions
    Replies: 2
    Last Post: 07-01-2013, 12:45 AM
  2. Replies: 0
    Last Post: 05-15-2013, 07:12 AM
  3. How to see percentage of items received daily, weekly, monthly?
    By ConfusedCitizen in forum Excel - New Users/Basics
    Replies: 3
    Last Post: 04-21-2013, 03:44 PM
  4. do something when new email is received in outlook
    By denvernuggets15 in forum Excel Programming / VBA / Macros
    Replies: 5
    Last Post: 06-05-2012, 11:34 PM
  5. Email sent but not received?
    By PenguinBacon in forum Excel General
    Replies: 2
    Last Post: 09-06-2007, 02:45 PM

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1