Oops, I should have removed the EXIT SUB. In column A, I have a named range.
I want to step through them one by one to view them. How do I do that?

Thanks

"Don Guillett" wrote:

try removing Exit sub
or simpler??
For i = 1 To Cells(Rows.Count, "A").End(xlUp).Row
MsgBox ("Displaying " & Cells(i, "A"))
Next i


--
Don Guillett
SalesAid Software

"Barb Reinhardt" wrote in message
...
I have the following snippet of code

For i = 1 To Cells(Rows.Count, "A").End(xlUp).Row
Set REF = Cells(i, "a")
Application.Goto Reference:=REF
Exit Sub
MsgBox ("Displaying " & Cells(i, "A"))
Next i

It's not going to the reference. What do I need to change?

Thanks,