![]() |
If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Search this Thread | Display Modes |
#1
|
|||
|
|||
![]()
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. |
Ads |
#2
|
|||
|
|||
![]()
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. |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
VBA to move outbound email and mark as read? | [email protected] | Outlook and VBA | 11 | May 2nd 06 03:07 PM |
Mark as read | Sven Berg | Outlook - General Queries | 1 | February 8th 06 09:20 AM |
Outlook 2003 - automatically mark all Junk email as "read" | Ric | Outlook - General Queries | 8 | January 19th 06 01:52 PM |
Command button not working on read page | jbtempe | Outlook - Using Forms | 2 | January 13th 06 11:25 PM |
Mark as Read? After x seconds? | HotRod | Outlook - General Queries | 2 | January 12th 06 07:22 PM |