VBA question from a complete noob

[Samurai]

Hey everyone,

I have just started learning VBA and I was practicing creating some very simple sub procedures. The procedure below inserts random numbers in a range that is 5 cells wide and 5 cells long:

Sub RandomCodeThatWorks()
Dim c As Double
Dim r As Double
    For r = 1 To 5
    For c = 1 To 5
        Cells(r, c) = Rnd
[B][COLOR=DarkGreen]    Next c
Next r[/COLOR][/B]
End Sub

Now here's what's driving me crazy. If I say Next r before Next c like in the next code, I get "Invalid Next control variable reference".

Sub RandomCodeDoesNotWork()
Dim c As Double
Dim r As Double
    For r = 1 To 5
    For c = 1 To 5
        Cells(r, c) = Rnd
[B] [COLOR=DarkRed]   Next r
Next c[/COLOR][/B]
End Sub

I was trying to figure out why this error occurs.

It appears that the variable order must be different in the For statement and the Next statement.

I have no idea why this is happening. I would really appreciate if someone could explain. Thanks!

 

[Peter_SSs]

Welcome to the MrExcel board!

That's just how 'For...Next' loops work. They need to nest one inside the other or be completely separate, they cannot overlap as in your second example.

 

[Roli001]

You have to finish one nested loop before you exit to the higher one.
i.e.

For i = 1 to 5
     For j = 1 to 5
          For k = 1 to 5
               .....your code....
          Next k
     Next j
Next i

 

[Samurai]

Now it makes sense! Thanks a lot Peter and Roli001.

Just shows that using indentation when nesting can make things a lot clearer.

 

[Roli001]

Glad to here we could help. Thanks for the feedback.