A
acunnold
I am trying to input random values from a range in excel into an array
What am I doing wrong?
From a damsel in distress!
----
Option Explicit
Option Base 1
Sub testing3()
Dim Vt() As Double
Dim j As Long
Dim i As Long
ReDim Preserve Vt(1 To 40)
For i = 1 To 40
j = Int(Rnd() * 1100)
Vt(i) = Worksheets("data").Cells(1, j)
Next i
End Su
What am I doing wrong?
From a damsel in distress!
----
Option Explicit
Option Base 1
Sub testing3()
Dim Vt() As Double
Dim j As Long
Dim i As Long
ReDim Preserve Vt(1 To 40)
For i = 1 To 40
j = Int(Rnd() * 1100)
Vt(i) = Worksheets("data").Cells(1, j)
Next i
End Su