CODEWITHSUNDEEP
arraysvbaexcelloopsfor-loop
Ziezo
Ziezo

Reputation: 57

Declare an array using a for loop vba

I want to make an array of the values: w1, w2, w3, y1, y2, y3 ... etc, but got an error in my code:

sub array()

Dim titles() as string

For i = 1 to 3

titles(i + 0) = "w" + i
titles (i + 3) = "y" + i
titles (i + 6) = "x" + 1

'...

Next i

End sub

Upvotes: 0

Views: 2052

Answers (1)

Gary's Student
Gary's Student

Reputation: 96753

You were quite close:

Sub arrray()

    Dim titles(1 To 9) As String
    Dim i As Long

    For i = 1 To 3
        titles(i + 0) = "w" & i
        titles(i + 3) = "y" & i
        titles(i + 6) = "x" & i
    Next i

    For i = 1 To 9
        MsgBox titles(i)
    Next i
End Sub

Upvotes: 1

Related Questions