The actual error might help.
I tried this:
Function Button1_onclick()
Dim Foo
ReDim Foo(9)
console.log(Foo)
ReDim Foo(19,29)
console.log(Foo)
ReDim Preserve Foo(19,28)
console.log(Foo)
End Function
and got this result (no error):
(10) [empty × 10]
(20) [Array(30), Array(30), Array(30), Array(30), Array(30), Array(30), Array(30), Array(30), Array(30), Array(30), Array(30), Array(30), Array(30), Array(30), Array(30), Array(30), Array(30), Array(30), Array(30), Array(30)]
(20) [Array(29), Array(29), Array(29), Array(29), Array(29), Array(29), Array(29), Array(29), Array(29), Array(29), Array(29), Array(29), Array(29), Array(29), Array(29), Array(29), Array(29), Array(29), Array(29), Array(29)]