Emptying Deleted Items

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hello everyone.

Firstly, thank you to Sue Mosher for her assistance on a recent question I
posted and her solution did the trick.

I now have another question!

Is it possible to use some code to empty the deleted items folder as part of
a macro?

Many thanks.
 
Am Thu, 24 Aug 2006 04:56:02 -0700 schrieb Darren Hermes:

Dim Items as Outlook.Items
Dim i as Long
Set Items=Application.Session.GetDefaultFolder(olFolderDeletedItems).Items
For i=Items.Count To 1 Step-1
Items(i).Delete
Next
 
Am Thu, 24 Aug 2006 04:56:02 -0700 schrieb Darren Hermes:

Dim Items as Outlook.Items
Dim i as Long
Set Items=Application.Session.GetDefaultFolder(olFolderDeletedItems).Items
For i=Items.Count To 1 Step-1
Items(i).Delete
Next
Click to expand...

While we're on this subject - I've been looking for a long time for a
way to purge items from a folder's dumpster with VBA.

Has anyone found a way, except by SendKeys, of doing that?
 
Back
Top