abenitez77
Board Regular
- Joined
- Dec 30, 2004
- Messages
- 149
I run the code below to fill sheet with data from an array. It takes a long time to finish when the ubound(shtdata_new,1) is only 40 and ubound(shtdata_new,2) is only 44. Is there a faster way to do this?
Code:
'Selecting first row on sheet
Range("A1").Select
'Copying data from array to worksheet
For i = LBound(Shtdata_new, 1) To UBound(Shtdata_new, 1)
For j = LBound(Shtdata_new, 2) To UBound(Shtdata_new, 2)
ActiveCell.Offset(i, j).Value = Shtdata_new(i, j)
Next j
Next i