extending array per every input

[Lavina]

Hey guys,

im trying to fill up my array and extended whenever needed:

arraySizeX = 1
arraySizeY = 2
ReDim Preserve orderArray(1 To arraySizeX, 1 To arraySizeY)
orderArray(1, 1) = "test"
orderArray(1, 2) = lastRow - 1
arraySizeX = arraySizeX + 1
ReDim Preserve orderArray(1 To arraySizeX, 1 To arraySizeY)
orderArray(2, 1) = "test2"
orderArray(2, 2) = Range("M2:M" & lastRow).Count

And i hit the error: subscript out of range, why is it happening?

 

[Marcelo Branco]

Take a look at
https://docs.microsoft.com/en-us/office/vba/language/reference/user-interface-help/redim-statement

You find...
"[FONT=&quot]If you use the [/FONT]Preserve[FONT=&quot] keyword, you can resize only the last array dimension and you can't change the number of dimensions at all. For example, if your array has only one dimension, you can resize that dimension because it is the last and only dimension. However, if your array has two or more dimensions, you can change the size of only the last dimension and still preserve the contents of the array."

M.
[/FONT]