for a small number of elements

MyArray = Evaluate("{" & "1, 5; 2, 3; 5, 4; 6, 6; 10, 7" & "}")

this will give a 1x5, 1x2 array

from the immediate window:

MyArray = Evaluate("{" & "1, 5; 2, 3; 5, 4; 6, 6; 10, 7" & "}")
? lbound(myarray,1), ubound(myarray,1)
1 5
? lbound(myarray,2), ubound(myarray,2)
1 2


--
Regards,
Tom Ogilvy


"Andoni " wrote in message
...
Hi!
And Thanks in advance!

I would like to have this array, kind of:
MyArray=Array(1,5;2,3;5,4;6,6;10,7)
this is just one example.
I am trying to get one array having the X and Y values of a different
cells.


* * *

how can i doing this
MyArray(1).select
and keep selected the Range("P2") cell if Activecell is [A1]


Many thanks
PS at the moment i am doing this:
MyArray = Array(1, 5, 2, 3, 5, 4, 6, 6, 10, 7)
For X = 0 To 9
ActiveCell.Offset(MyArray(X), MyArray(X +
1)).interior.colorindex=3 'just example
Debug.Print ActiveCell.Address
X = X + 1
Next X


---
Message posted from http://www.ExcelForum.com/