assigning values to an array

[Juggernath]

Im new to VBA, is there some elegant way to assign number of values to an
array, for ex:

Dim A(0.3265, -1.07, -0.5339, 0.01569, -0.05165, 0.5475, -0.7361, 0.1844,
0.1056, 0.6134, 0.721) As Double
or
Dim A(11) as Double {0.3265, -1.07, -0.5339, 0.01569, -0.05165,
0.5475, -0.7361, 0.1844, 0.1056, 0.6134, 0.721}

instead of
A(1)=0.3265
A(2)=-1.07
....
....
....
....

 

[Bob Phillips]

Dim A
A = [{0.3265, -1.07, -0.5339, 0.01569, -0.05165,0.5475, -0.7361, 0.1844,
0.1056, 0.6134, 0.721}]



--

HTH

RP
(remove nothere from the email address if mailing direct)

 

[Dave Peterson]

One more:

Dim myArr as Variant
dim iCtr as long
myArr = array(0.3265, -1.07, -0.5339, 0.01569, -0.05165, 0.5475, _
-0.7361, 0.1844, 0.1056, 0.6134, 0.721)

for ictr = lbound(myarr) to ubound(myarr)
msgbox myarr(ictr)
next ictr