didn't really suggest anything.
I said the reason why it most likely is crashing.
there is no such array that has ubound of -1.

so, to test that situation, place simple:
ubound($all) ?

before your redim line.
if it gives 0, you can't reduce the ubound, obviously.
_________________________
!

download KiXnet