?
Solved

How to automaticaly dismiss overdue reminder

Posted on 2011-03-09
13
Medium Priority
?
2,061 Views
Last Modified: 2012-05-11
We a user that access about 15 calendars and she gets about 5000 reminders and that's her a good 5 minutes for outlook to load, most of them are overdue, is there a way to automaticaly dismiss overdue reminders?
0
Comment
Question by:nourben
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 7
  • 4
13 Comments
 
LVL 76

Expert Comment

by:David Lee
ID: 35083730
Hi, nourben.

I can do it with a script in Outlook.  Is that an acceptable option?
0
 

Expert Comment

by:rmcxb
ID: 35443860
It's acceptable for me.  Can you pls assist with this?  
0
 
LVL 76

Expert Comment

by:David Lee
ID: 35444326
Love to.  Here's a link to a post on my blog where I show how to do this.

http://techniclee.wordpress.com/2011/04/01/killing-overdue-reminders-in-outlook/
0
VIDEO: THE CONCERTO CLOUD FOR HEALTHCARE

Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.

 

Expert Comment

by:rmcxb
ID: 35444350
Funny, I saw this before signing up for Experts-Exchange.  Thanks for this but I'm trying to determine how to do this in Outlook 2010.  
0
 
LVL 76

Expert Comment

by:David Lee
ID: 35444397
That will work in 2010 also.
0
 

Expert Comment

by:rmcxb
ID: 35444433
I suppose my issue is then that I don't see how to get into Visual Basic Editor.  The closest I can come to finding anything about macros is under Trust Center > Trust Center Settings > macro settings.  How do the steps relate to 2010?
0
 
LVL 76

Expert Comment

by:David Lee
ID: 35444475
Sorry, I thought you were saying that you didn't think the solution would work for 2010.  I haven't written step by step instructions for 2010 yet.  ALT+F11 will open the editor.  
0
 

Expert Comment

by:rmcxb
ID: 35444648
I didn't know about Alt-F11 -- Thank you!  I was able to walk my way through creating the macro and is brought me down from 81 to 51 to 36 to 21 to 15 > I had to re run the macro a few times, but still, it worked!!  Now to apply it to my managers system where he has hundreds of old reminders.  Thanks mate.  
0
 
LVL 76

Accepted Solution

by:
David Lee earned 2000 total points
ID: 35444713
Oops.  You just discovered a bug.  The loop through the reminders is missing some.  I just corrected the code.  Grab the revised copy (below) and you should be in business.
Private Sub Application_Startup()
    KillOverdueReminders
End Sub

Sub KillOverdueReminders()
    ' Purpose: Kills all reminders for past due appointments.'
    ' Usage:   Run at Outlook startup to eliminate reminders on appointments that occur in the past.'
    ' Written: 4/1/2011'
    ' Author:  David Lee'
    ' Outlook: All versions'
    Const GRACE_PERIOD_MINUTES = 60
    Dim olkReminder As Outlook.Reminder, intIndex As Integer
    For intIndex = Application.Reminders.count To 1 Step -1
        Set olkReminder = Outlook.Reminders.Item(intIndex)
        If olkReminder.Item.Class = olAppointment Then
            If DateAdd("n", GRACE_PERIOD_MINUTES * -1, Now) > olkReminder.NextReminderDate Then
                olkReminder.Dismiss
            End If
        End If
    Next
    Set olkReminder = Nothing
End Sub

Open in new window

0
 
LVL 76

Expert Comment

by:David Lee
ID: 35741180
Sorry, but I have to object to the notion that I "Did not get the right answer".  The solution I posted works.  How is that not the right answer?
0
 
LVL 76

Expert Comment

by:David Lee
ID: 35742870
My recommendation is to accept post http:a35444713 as the answer and award it the points.  The solution does work, as verified by rmcxb.  The initial post did have a a minor code error which I corrected in the post I'm recommending.
0

Featured Post

Windows Server 2016: All you need to know

Learn about Hyper-V features that increase functionality and usability of Microsoft Windows Server 2016. Also, throughout this eBook, you’ll find some basic PowerShell examples that will help you leverage the scripts in your environments!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

New style of hardware planning for Microsoft Exchange server.
Want to know how to use Exchange Server Eseutil command? Go through this article as it gives you the know-how.
In this video we show how to create a mailbox database in Exchange 2013. We show this process by using the Exchange Admin Center. Log into Exchange Admin Center.: First we need to log into the Exchange Admin Center. Navigate to the Servers >> Data…
Exchange organizations may use the Journaling Agent of the Transport Service to archive messages going through Exchange. However, if the Transport Service is integrated with some email content management application (such as an antispam), the admini…
Suggested Courses

649 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question