Solved

How to automaticaly dismiss overdue reminder

Posted on 2011-03-09
13
1,640 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
  • 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
 

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
How to run any project with ease

Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails

 

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 500 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

How your wiki can always stay up-to-date

Quip doubles as a “living” wiki and a project management tool that evolves with your organization. As you finish projects in Quip, the work remains, easily accessible to all team members, new and old.
- Increase transparency
- Onboard new hires faster
- Access from mobile/offline

Join & Write a Comment

Suggested Solutions

Find out how to use Active Directory data for email signature management in Microsoft Exchange and Office 365.
Not sure what the best email signature size is? Are you worried about email signature image size? Follow this best practice guide.
In this video we show how to create a User Mailbox 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 Recipients >> Mailb…
In this video we show how to create an Accepted Domain 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 Mail Flow >> Ac…

762 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

Need Help in Real-Time?

Connect with top rated Experts

19 Experts available now in Live!

Get 1:1 Help Now