If you know that the range will always be A1:A6 and you don't mind having a
long line of code, you can use:
myArray = Array(Range("A1").Value, Range("A2").Value, Range("A3").Value,
Range("A4").Value, Range("A5").Value, Range("A6").Value)

--
Thanks,
Mike


"WhytheQ" wrote:

1
2
3
4
5
6

What is the quickest way of putting the above into an array?
The above numbers are located on sheet1 range("A1:A6")

I use what I believe is the normal way of filling the array i.e a For
Next Loop - but maybe there are better ways of going about it?

Regards,
Jason.