Clear Flag for follow up items macro

[dim4x4]

Hello!

Could anyone please help me with Clear Flag macro for Outlook 2003?

Sometimes I "flag" my e-mail items for follow up with flags of various
colors. To remove the flag, I need to right clic, go to follow up, then
select clear flag. Is there a way to do with one macro to be assigned
to a button or shortcut? I would also like to be able to select several
items and remove flags on all of them with just one click.

I found the code written by Sue Mosher here:
http://www.windowsitpro.com/Files/04/38884/Listing_01.txt
but unfortunately it does not work. Probably because I use Outlook
2003, and the code was written for previous versions.

Maybe there is a simple way to put that menu item on a toolbar? Any
help is appreciated.

Thx!

 

[Sue Mosher [MVP-Outlook]]

In the code snippet you cited, change this statement

Set objOL = CreateObject("Outlook.Application")

to

Set objOL = Application

To add a VBA macro to the toolbar, see http://www.slipstick.com/outlook/toolbar.htm#macro

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003

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

 

[dim4x4]

Thanks, Sue! Made the change, but unfortunately it didn't work

After the change I restarted Outlook. It only removes the words "Follow
up" which appear in a grey borderlss box, in the top part of a message
(just below sender's name). However it does not remove the flag.

Maybe there's something wrong with my Outlook? Macro security is set to
"Low".

 

[Sue Mosher [MVP-Outlook]]

Try adding:

.FlagIcon = olNoFlagIcon

BTW, if you want to troubleshoot this kind of thing for yourself, get a copy of Outlook Spy (http://www.dimastr.com) so you can check and compare Outlook property values without writing code.

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003

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

Thanks, Sue! Made the change, but unfortunately it didn't work

After the change I restarted Outlook. It only removes the words "Follow
up" which appear in a grey borderlss box, in the top part of a message
(just below sender's name). However it does not remove the flag.

Maybe there's something wrong with my Outlook? Macro security is set to
"Low".

In the code snippet you cited, change this statement

Set objOL = CreateObject("Outlook.Application")

to

Set objOL = Application

To add a VBA macro to the toolbar, see http://www.slipstick.com/outlook/toolbar.htm#macro

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003

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

 

[dim4x4]

THANK YOU!!! It worked!

ps. Outlook Spy is beyond me =)