The event you're looking for is the ItemAdd event of the folder for sent
items. That event fires when an item is added to the folder. There's an
example available in the VBA help file.

The added item is pased to the procedure, call its Copy function, which
returns a new item. For that you can call Move which returns the moved item.
For that call Unread=false, then Save.

--
Best regards
Michael Bauer - MVP Outlook
Category Manager - Manage and share your categories:
SAM - The Sending Account Manager:
http://www.vboffice.net/product.html?lang=en


Am Mon, 17 May 2010 05:41:01 -0700 schrieb BlueWolverine:

Hello,
MS OUTLOOK 2003 on XP PRO.

I would like to setup a "rule" (either a "Rules Wizard" Rule or code in
VBA)
to make a copy of every sent email, move it to a folder and mark that copy
as
read. I did a search on google, and found the command "Item.Unread=false"
but I have no idea how to setup the code around it.

I hate asking, "Can someone show me how to do the entirety of what I'm
asking?" but I've never programmed in Outlook before and I have no idea
how
to define an event trigger. (In access, I'd be looking for something like
"OnEmailSent") I have reasonably extensive experience programming in
Excel
and Access but like I said I have no idea what to do in Outlook. If
anyone
can give me a hand with this I'd be very grateful.

Thanks,