So back to the codes given and discussed in this Thread, but again the use of
arrOut() = Application.Index(arrIn(), rwsT(), clms())
arrIn() we have ( as an Array by Rick or as a spreadsheet "Area" by snb )
All the "work" in the codes is to get the required rwsT() and clms() indices.
For no particular reason I am considering this as my Input "Area"
Using Excel 2007 32 bit
Row\Col A B C D E F1 0 10 20 30 40 2 2 12 22 32 42 3 4 14 24 34 44 4 6 16 26 36 46 5 8 18 28 38 48 6 10 20 30 40 50 7 12 22 32 42 52 8 14 24 34 44 54 9 16 26 36 46 56 10 18 28 38 48 58 11
Sheet: NPueyoGyanArraySlicing
......
And to demo the Array returned by the Functions I will Paste it out here
Using Excel 2007 32 bit
Row\Col M N O P Q16 17 0 10 20 30 40 18 2 12 22 32 42 19 4 14 24 34 44 20 6 16 26 36 46 21 10 20 30 40 50 22 12 22 32 42 52 23 14 24 34 44 54 24 16 26 36 46 56 25 18 28 38 48 58 26
Sheet: NPueyoGyanArraySlicing
So it follows that the main "work will be to get
rwsT() = { 1; 2; 3; 4; 6; 7; 8; 9; 10 } ' ( 2 Dimensional 1 "column" "Vertical" Array )
and
clms() = { 1, 2, 3, 4, 5 } ' ( 1 Dimension "pseudo Horizonal" Array )
_................................................. ...




Reply With Quote
Bookmarks