Should have tested it first. Use this.

For i = LBound(myArr) To UBound(myArr)
Range("A" & i + 1) = myArr(i)
Next

Adding the .Value will throw an error since myArr(i) is a value.


"Striker3070" wrote in message
...
I have an array with about 1500 names in it. How can I add those names to
column A1 on sheet1 and go down one cell 1500 times and add the next value
to the spreadsheet? in Excel07 VBA