VBA Scripts Do Not Show Up As "Custom Actions"

[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.

 

[Sue Mosher [MVP-Outlook]]

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

 

[ajkessel]

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.

 

[ajkessel]

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?

 

[Ken Slovak - [MVP - Outlook]]

You would need an ItemAdd handler for every possible Items collection where
the routing could send the message.