Dim MyArray As Variant
MyArray = Worksheets("TEST").Range("A2", Range("A100").End(xlUp)).Value
MsgBox LBound(MyArray) & vbCr & UBound(MyArray)
--
Jim Cone
San Francisco, USA
http://www.realezsites.com/bus/primitivesoftware




wrote in message
Hi,
The following array code gives me an error message Run time error 1004
"Application defined or object defined error" How do I fix? Thanks -
Dean

MyArray = Worksheets("TEST").Range(Range("A2"),
Range("A100").End(xlUp))