not exactly sure what you're trying to do, but maybe this will give you an idea.

Sub test2()
Dim x As Long
Dim dataHere As Variant
dataHere = Range("A1:C9")
For x = LBound(dataHere) To UBound(dataHere)
Debug.Print dataHere(x, 2)
Next
End Sub

--


Gary


wrote in message
...
Hello,

I have declared a variable:
Dim dataHere(1 to 9, 1 to 3) as double

How could I select the second column from this matrix to use in
further calculations ?

I tried dataHere(All, 2) and dataHere(1 To 9 , 2)but got an error each
time.

Any ideas ?

Tom