Reverse Direction of For-Each-Next?

[FuzzyDove]

Hi All -
part of the code I'm working on has something like:
' _______________________________
For Each XYZ In Range (Cells(topaddressrow, topaddresscolumn)
Cells(bottomaddressrow, bottomaddresscolumn))

My_Var = bla.....gather, sum, combine etc what I'm getting.... bla.

Next

Range("X5").Value = My_Var
' _______________________________

The contents of My_Var is always the result of the code working fro
the top of the range downward to the bottom of the range. It does no
matter which way I define the range.
My question is: Is there a way to make the For Each statemen
work/return data from the bottom up?

Thanks for any help!
FuzzyDov

 

[crispbd]

For Counter = Start to Finish *Step -1*


Next Counte

 

[Harald Staff]

For ranges it can be done like this:

Sub test()
Dim ABC As Range
Dim XYZ As Range
Dim L As Long
Set ABC = Range(Cells(1, 1), Cells(3, 3))
For L = ABC.Count To 1 Step -1
Set XYZ = ABC(L)
MsgBox XYZ.Address
Next
End Sub

HTH. Best wishes Harald