N
nenad
Here is a type of code that I am using now. myX, myY and myZ are
filled 'by force' down to rows and is extremely slow. How to make a
code to insert these values into an array and then transfer the
contents of the array to the range?
filled 'by force' down to rows and is extremely slow. How to make a
code to insert these values into an array and then transfer the
contents of the array to the range?
Code:
Sub Test()
i = 10
j = 10
For myX = -i To i
For myY = -j To j
myZ = i + j
ActiveCell.Value = myX
ActiveCell.Offset(0, 1).Value = myY
ActiveCell.Offset(0, 2).Value = myZ
Cells(ActiveCell.RoW + 1, 1).Select
Next myY
Next myX
End Sub