Dynamic two dimensional array

This functions input is an range and the output are an array of row numbers, it only returns those rows which has same value two or more times, aka duplicates + 1 occurrence.
As a one dimensional array it works fine, but I also want to add how many occurrence there are for each row, so i'm trying to transform the script to a dynamic two dimensional array (tempArray2).
But I can't get it work. I read somewhere that it's only possible to redim the last dimension, therefore "ReDim Preserve tempArray2(t)".
I get "subscript out of range" on row 12. Any pointers? Is it even possible?

Please Login or Register  to view this content.

Apart from everything else, there is no one "End If" clause.

The missing 'End if' is just a typo, it's exists in my code, so that's not the issue.
Change the redim to...

Please Login or Register  to view this content.

...makes it work. But then it's not dynamic.

I found a flaw in my script, I have misunderstood how to fill the array, here is a more correct code.
But main issue still remains, how to redim?

Please Login or Register  to view this content.

Where are the other "Case" and "End Select" ?

Originally Posted by porucha vevrku

Why don't you create a two-dimensional array right away/from the beginning ?
Can you present the appearance/layout of the data on which this function works ?

If "Dim Preserve ..." works inside a loop, this is dynamic ... (?)

Well, it works if I start with

Please Login or Register  to view this content.

The problem is that I don't know how many rows(first dimension) there will be, so I don't understand/see how I write that code.

The data would look this
Attachment 660491
And the input to the function would Range(A2:A5). The expected outcome will be [3, 2] (line 3, two times)

Originally Posted by porucha vevrku

Where are the other "Case" and "End Select" ?

Also typo, since they are not part of the problem I have cleaned them to make it more readable, it back fired this time. =)

Please Login or Register  to view this content.