Finding highest value in array

[Rasm]

Good morning
Attached is an example - I have extracted only the relevant code. In this example I write the RSQes to the worksheet "Matrix" - but I really dont want to write the RSQes to a worksheet - what I really want to do is rank the values in then array CorrelMatrix(i + 1, ii + 1) from highest to lowest - ignoring the empty elements. In other words I want to find the value closest to 1 (or -1) - after that I want to find the next highest value and so on. So I am trying to find the pairs of observation that are has the highest correlation.
Also keep in mind this example only has 20 observation - in real cases I will have more than 1K observations.
Ignore the references to ItGrid - it is a third party OCX used as a data grid. I removed the references in this example.