Fill Array from a Range
Why can't I fill my array from the range below? I have ensured that the
range is (8 rows X 3 columns).
Dim lngLastRow As Long
Dim aryUserInfo(8, 3) As String
' set array equal to username range
With Workbooks("QG Add-In.xla").Sheets("Login Data")
lngLastRow = .Cells(Rows.Count, "A").End(xlUp).Row
Error aryUserInfo = .Range("B2:D" & lngLastRow).Value
End With
--
Cheers,
Ryan
|