Reverse loop?

Reverse loop?

Post by eW9uaW5 » Thu, 02 Feb 2006 17:46:29



Hi,

I have the following loop:

For Each mail In Folder.Items
.
.
.

Next

The loop runs from the first email that was sent/accepted to the last one.
How can I make the loop go backwords? from the last email that was
sent/accepted to the first?
 
 
 

Reverse loop?

Post by Michael Ba » Thu, 02 Feb 2006 21:46:49

Am Wed, 1 Feb 2006 00:46:29 -0800 schrieb yonina:

dim i&
For i=Folder.Items.Count to 1 step-1
set mail=Folder.Items(i)
Next

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

 
 
 

Reverse loop?

Post by eW9uaW5 » Fri, 03 Feb 2006 18:10:27

Thank you!!!!!!!!!!!!!!!!!

That was exactly what I needed!!!!!!!!!!!!!!!!!!!

:)))