Transferring part of a large array to smaller array

Good day,
I'm trying to transfer a part of a large array to a smaller array and then put it to a spreadsheet range, but it is not working for me.
Here is the code:

Please Login or Register  to view this content.

I've attached a workbook.
Help me to understand what I'm doing wrong.
Thanks,
Xrull

Using your existing code: you need to look at use of r & rCel given iCount and x, i.e:

Please Login or Register  to view this content.

Again the above is just to illustrate how you could look to adapt your existing code.