How do I modify Delete button to also mark item as read?
 

The default Delete button in Outlook 2003, seems to delete the item,
without marking it as read. Is there a way that I can modify it to
first mark the item as read, then delete the item? Would I need to use
VBA to accomplish this? If so, could anyone tell the code I should
write, as I am not very familiar with using VBA in outlook. Thanks.

How do I modify Delete button to also mark item as read?
 

Am 23 Apr 2006 11:29:21 -0700 schrieb :

This sample marks all items as read which are being moved into the
DeletedItems folder.

Private WithEvents Items As Outlook.Items

Private Sub Application_Startup()
Set Items =
Application.Session.GetDefaultFolder(olFolderDelet edItems).Items
End Sub

Private Sub Items_ItemAdd(ByVal Item As Object)
Item.Unread=False
Item.Save
End Sub

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.vbOffice.net --


The default Delete button in Outlook 2003, seems to delete the item,
without marking it as read. Is there a way that I can modify it to
first mark the item as read, then delete the item? Would I need to use
VBA to accomplish this? If so, could anyone tell the code I should
write, as I am not very familiar with using VBA in outlook. Thanks.