VBA what is wrong

[Jan Kalop]

What is wrong with bellow VBA code

Sub TwentyfiveRandOf25ONLY6()
Dim myVal As Integer
myVal = Range("AT36").Value
Dim i As Long
Dim randIndex As Long, temp As Long
For i = 1 To myVal
anArray(i) = i
Next i
For i = 1 To myVal
Randomize
Do
randIndex = (Rnd() * myVal) + 1
Loop Until randIndex <= myVal
temp = anArray(randIndex)
anArray(randIndex) = anArray(i)
anArray(i) = temp
Next i

Range("az36").Resize(, 7).Value = anArray
End Sub

 

[Derek Brown]

If you debug/compile or add "Option Explicit" you will find that you have not declared "anArray".
You did not say what appeared to be the problem you were having, so I am just guessing.

 

[Jan Kalop]

If you debug/compile or add "Option Explicit" you will find that you have not declared "anArray".
You did not say what appeared to be the problem you were having, so I am just guessing.

so what have to be done to make it working....sorry but I don't know anything about how to fix this

 

[Fluff]

Duplicate https://www.mrexcel.com/forum/excel-questions/1069192-vba-correction.html#post5135448

Please do not post the same question multiple times. All clarifications, follow-ups, and bumps should be posted back to the original thread.
Per forum rules, posts of a duplicate nature will be locked or deleted (rule 12 here: Forum Rules).