VBA If Else within For Next Loop

Question

I need a VBA If Else statement within a For Next loop

I have tried various arrangements of the statements, but they all error out.

Sub TestForIfElse()
   Dim Counter As Integer
   Dim i As Integer

   For i = 1 To 5

   Counter = i

   If Counter > 3 Then

        Exit For

    Else

    Next i   'ERROR NEXT WITHOUT FOR
End Sub

Run loop until test is met.

If Test not met, keep going

If test met, exit loop. Thanks for your help.

You need to include an End If if you want to use If Else. So you would use If... Else... End If — DDV
– DDV, Commented Jun 21, 2019 at 7:24

Mikku · Accepted Answer · 2019-06-21 03:57:24Z

2

This will work:

Sub TestForIfElse()

   Dim Counter As Integer
   Dim i As Integer

   For i = 1 To 5

       Counter = i

       If Counter > 3 Then

            Exit For

       End If

   Next i

End Sub

answered Jun 21, 2019 at 3:57

Mikku

6,7043 gold badges19 silver badges39 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

Chas Over a year ago

Worked beautifully.

Collectives™ on Stack Overflow

VBA If Else within For Next Loop

1 Answer 1

1 Comment

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Your Answer

Sign up or log in

Post as a guest

Linked

Related