VBA: jumping out of a for loop - vba

Question

How do I achieve the following?
Sub Macro1()
'
' Macro1 Macro
'
'
Worksheets("Drop-down").Select
n = Cells(1, 1).End(xlDown).Row
For i = 1 To n
ActiveSheet.Cells(i, 2).Select
*******************************************************
If Worksheets("Misc").Cells(2, i).Value = "" Then
continue i
End If
*******************************************************
If Worksheets("Misc").Cells(3, i).Value <> "" Then
Set validationRange = Range(Worksheets("Misc").Cells(2, i), Worksheets("Misc").Cells(2, i).End(xlDown))
Else
Set validationRange = Worksheets("Misc").Cells(2, i)
End If
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:=validationRange.Address
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
Next i
End Sub

Answer 1

Isn't this a simple flow control case? I don't understand the need for special keywords to solve it:
For i = 0 To 10
If Not condition Then
some other code
Next
EDIT: Or, in your code:
Sub Macro1()
'
' Macro1 Macro
'
'
Worksheets("Drop-down").Select
n = Cells(1, 1).End(xlDown).Row
For i = 1 To n
ActiveSheet.Cells(i, 2).Select
*******************************************************
If Not Worksheets("Misc").Cells(2, i).Value = "" Then
*******************************************************
If Worksheets("Misc").Cells(3, i).Value <> "" Then
Set validationRange = Range(Worksheets("Misc").Cells(2, i), Worksheets("Misc").Cells(2, i).End(xlDown))
Else
Set validationRange = Worksheets("Misc").Cells(2, i)
End If
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:=validationRange.Address
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
********
End If
********
Next
End Sub

Answer 2

And to answer the other half of the question:
For n = 1 To something
If condition Then
Exit For
End If
' more code
Next n

Answer 3

Aren't vb's keywords capitalized?
For n = 1 To something
If condition Then
Continue For
End If
' more code
Next n
The Continue keyword does what you want.
http://msdn.microsoft.com/en-us/library/801hyx6f(VS.80).aspx

Answer 4

It's a too old question, but just for sake of correctness and completeness in this page, this is one of the situations that Goto can be used without resulting in Spaghetti code...
It leverages VBA's Loop to almost any other newer programming language, and provides VBA programmers with the same functionality described by Eric in another answer - but Eric's answer does not works in VBA:
For n = 1 To something
If needToExitLoopEntirely Then Exit For
If condition Then GoTo ContinueFor
' more code
' ...
' more code
ContinueFor: '<=this is a label;
Next n