Automating Outlook Reminders

G

Guest

Good morning all - I yesterday posted a query to the
microsoft.public.outlook.general usenet group regarding a question about
coding the automatic completion/dismissal of reminders. The post was as
follows...

"I recently put together a macro which saves the bodies of e-mail
messages as text files which works as I would like it to.

I wanted to automate the running of this macro and discovered that the
best way to this would probably be by creating a task in Outlook which
recurs each day at a specific time and then in the Reminder section of
the This Outlook Session coding in the Visual Basic editor in Outlook
(using version 2003 by the way) I simply added a line to call the
aforementioned macro.

This too works fine in that the reminder appears and the code is run.

However - doing it this way does not automatically dismiss or complete
the task. In order for the task to recur the next day the task must be
completed, not dismissed, and so whilst it works the first time, the
reminder doesn't appear again next day.

Is there any coding I can add to the Reminder section of the This
Outlook Session coding which would automatically dismiss the reminder
(so to remove it from screen) and also mark it as being complete (so to
allow it to recur again next day)."

I had a response suggesting that I look to set the tasks complete property
to true. So, I went to the ThisOutlookSession code and the Reminders section
and tried to do this, but being a complete coding novice I failed miserably!

I've moved this query to a more appropriate forum and was hoping somebody
might be able to provide me with information and suggest some code that I
could try using. At present, it looks like this....

Private Sub Application_Reminder(ByVal Item As Object)
Call UberMacro
End Sub

This simply calls the macro which I want to run once a reminder is
triggered. Any suggestions would be most appreciated.

Darren
 
S

Sue Mosher [MVP-Outlook]

To mark the item that fired the reminder complete:

Private Sub Application_Reminder(ByVal Item As Object)
If Item.Class = olTask Then
Item.Complete = True
Item.Save
End If
End Sub
--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003

and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top