esacping for...next loop early (wordbasic)

1. Do Loop... Execute Next Loop upon Conditional

Hello NewsGroup

I have a For Next Loop represented simply below:

    Do Until Name = ""

        Set Name = ActiveCell.Offset(i, -1)
'ActiveSheet.Cells(ActiveCell.Row + i, ActiveCell.Column)

            If WorksheetFunction.CountIf(NameList, Name) = 0 Then

                MsgBox "Name Not in Database"

                Exit Sub

            End If

        Test = NameBlotter(Name, TradeDate, NameList, SharesTraded,
UnitCost)

ActiveWorkbook.Application.Range("NameBlotter").CurrentRegion.ClearContents

        Answer = NameBlotter(Test, i)

    i = i + 1

    Loop

I have a test condition represented by the If Then statement above.  If it
is true, A message box appears, then upon user input, the macro exits the
routine.

I would prefer that after the conditional is true, it will skip to "i = i
+1".

How can I do this?

Thank You

W

2. Can Distribution List's members sort by Last Name in OL2000?

3. in a for...next loop, simple way to skip rest of current loop?

4. macros and autocorrect

5. for...next loop within a while loop.

6. Probs with embedding! HELP!!!!!!!!!

7. Movie stops early and goes to next slide

8. changing source data

9. For-Each loop quits early

10. Why wont this for next loop work?

11. for next loop - working with files (newbie)

12. For Next Loop Problems

13. FOR NEXT Loop to Create Array Name