Looping seems to hit a dead end

[yxz152830]

Gurus,
I have a line of code that causes excel to freeze and I have every reason to believe that it's the Do Loop Until statement that causes the issue.
The thing is I need to know at what cycle does the looping starts to hit a dead end. if excel freezes it's not gonna save it for me. What kind of command can I use to force the subroutine to end and give me part of the result to see what goes wrong? F8 is too time consuming.

 

[mohadin]

Hi
You can use exit for at some stage
EX

Sub test()
For i = 1 To 10000000

If i = 500 Then Exit For

Next
End Sub

 

[yxz152830]

Hi
You can use exit for at some stage
EX

Sub test()
For i = 1 To 10000000

If i = 500 Then Exit For

Next
End Sub

how do i use loop until with this?

 

[mohadin]

EX2

Sub test()
    Do
.
.
.

        i = i + 1
        If i = 500 Then Exit Do
    Loop
End Sub