VBA Scripts Do Not Show Up As "Custom Actions"

  • Thread starter Thread starter ajkessel
  • Start date Start date
A

ajkessel

I have a simple procedure in ThisOutlookSession:

Sub MarkRead_CustomAction(Item As Outlook.MailItem)
Item.UnRead = False
Item.Save
End Sub

When I create a rule and click on "custom action," my subroutine
MarkRead_CustomAction is not an option. In fact, there are no options.
Even if I save the VBA and close and reopen Outlook, I still don't have
any custom actions as options.

When I go to Tools-->Macros, I do get a "Security Warning" and I have
to select "Enable Macros." For Macros that need access to the Address
Book, I need to further click 'yes' (although the procedure above
obviously does not access the Address Book). Even after "Enablinng
Macros," I still have no options in the "custom action" dialog.

Any ideas why this isn't working?

I first raised this issue in this thread:

http://groups.google.com/group/micr...ram_vba/browse_thread/thread/3347ecdedbf006fa

But I did not find any solutions, so I thought I would raise it here as
a separate thread.

Thanks for any suggestions.
 
Wrong rule action. The rule action you want is "run a script" not "custom action."

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

and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers
 
Oh, I see the problem now. You can "run a script" for incoming email,
but not for outbound email. Is there any way around this limitation? It
doesn't make any sense to me.
 
Actually, I can almost do what I want by creating an _ItemAdd
procedure. It seems fairly straightforward to create an _ItemAdd
procedure for the Default Folder for Sent Items, but what I want to do
is create an _ItemAdd procedure for messages that are routed to a
different folder by an outbound rule. Is there any way to do that?
 
You would need an ItemAdd handler for every possible Items collection where
the routing could send the message.
 
Back
Top