Hi
I am trying to Redim a multi dimension array.
I have declared the array at the top of the module as
Dim DataStor as variant
Then in the sub i have a loop
For i = 1 to XYZ
r = r +1
Redim Preserve DataStor(r,16)
DataStor(r,1) = Unit
DataStor(r,2) = Time
etc
Next i
it picks up...