Go back one cell

[Nimrod]

I have a loop that steps through a range . What I would like to do is go backs one cell in my steps through the range if a particular condition is met. Can anyone help me with this .... Please.

For Each c In RangeTest

If false Then
'go back one cell in range
End If

next c

[Tom Schreiner]

Hi Nim

Sub LastStep()

Dim c As Range, LastStep As Range



For Each c In RangeTest

If False Then

    LastStep.Select

    Exit Sub ' or exit for

End If

LastStep = c

Next c

End Sub

Tom

[Colo]

Hi,
Maybe TsTom just forgot to writing this.

Sub LastStep()

Dim c As Range, LastStep As Range, RangeTest As Range



For Each c In RangeTest

If False And Not c Is Nothing Then

    LastStep.Select

    Exit Sub ' or exit for

End If

Set LastStep = c

Next c

End Sub

[Nimrod]

Thanks for the help , I believe this will solve my problem quite nicely.