Populate cells with arrays
One way:
If your array is a Variant:
Range("A1:AD1").Value = Array1
In article ,
"Adrian T" wrote:
Hi:
I have 50 arrays with 30 elements each. On a sheet, it
would look like a 50rows x 30columns table.
For now, I can live with the row loops. But, I really need
a way so I can populate my columns (Ax:ADx) with my array
elements without doing the column loops. What I have right
now is a very simple column loop but hurts the performance
really bad.
Range("A1").Activate
For i = 1 To 30
ActiveCell.Value = Array1(i)
ActiveCell.Next.Activate
Next i
Does anyone have a better solution?
Regards,
Adrian T
|