You have to switch the views as far as I know. Another option, would
be to insert a debug.print statement into your loop. for example the
following will print the values of the first 10 cells in column A

Sub test()

Dim CurRng As Range
Dim Cnt As Integer

Application.ScreenUpdating = False
For Cnt = 0 To 9
Set CurRng = Range("A1").Offset(Cnt, 0)
Debug.Print "Range " & CurRng.Address & " = " & CurRng
Next Cnt
Application.ScreenUpdating = True

End Sub

I prefer this method as I often will turn off the screenupdating
process to smooth out performance.