Option Explicit
Sub testme02()
Dim myArr As Variant
myArr = ActiveSheet.Range("a1:a2").Value
'myArr = Application.Transpose(ActiveSheet.Range("a1:a2").V alue)
End Sub

The first version actually makes a 2 row by 1 column array.

The second (application.transpose version) makes it a single dimension array.




Marina Limeira wrote:

How populate array by sheet data ?

example:

a1 = "mary"
a2 = "john"

in VBA

var AR = array( populate from A1 and A2 )

thanks

Marina

--

Dave Peterson