To write an array to a range the array will have to be a 2-D array and yours
is a 1-D array.
Why worry about the For Next loop? Your array is very small, so
performance-wise it won't make a difference.

RBS


"RyanH" wrote in message
...
I currently have an array of userform control values. I need to list these
controls values in a column. I currently use a For...Next Loop to list
the
elements, but I would like to not use a loop. The could I have below
doesn't
work, why?

Option Base 1

Sub Test()

Dim aryControls As Variant

aryControls = Array(Control1, Control2, Control3, etc.)
Sheets("Data Storage").Range(Cells(1, lngColumn), Cells(UBound(ctlArray),
lngColumn)).Value = ctlArray

End Sub
--
Cheers,
Ryan