Static Runner() As Variant

idex = idex + 1
A = 13
For I = 1 To 4

A = A + 1
ReDim Preserve Runner(1 To 4, 1 To idex)
Runner(I, idex) = Range("f" & A)
Debug.Print Runner(I, idex)

Next I

Range("t2").Resize(UBound(Runner, 1), 4) =
Application.Transpose(Runner)
Hi, could somebody what Im doing wrong with above. Ive got runner as a
static variable, Im using this in worksheet change so each cell change
idex counts up. Im adding data to runner then transposing to a range
purly to test data is going in ok, wont be doing this in final macro.
When I transpose I only get 4 rows and 4 columns, if I change the 4 to
say 10 then I get 10 cols 6 with n/a in which is what i thought would
happen. I thought i would have had to put the redim as (1 to idex, 1 to
4), but this creates an error. if I increase the the redim (1 to 50, 1
to idex) i get 50 rows, but this doesnt help because anything added
after 50 doesnt show. Any Ideas on what im doing wrong.
Regards Robert