Also I ran into 'Unable to get the MMult property..' which I suspect
is solvable by
Application.WorksheetFunction.Transpose(Extrate)
instead of
Extrate
in the bothersome line.

because MMULT requires that 'the number of columns in array1 must be
the same as the number of rows in array2', and I *think* that vba
sees array2 as a single row horizontal array.

THEN I get the type mismatch again...

Running out of time now, one shot in the dark though; does this need
to be a loop? Would
results() = Application.Worksh....
work rather than
results(k) = Application.Worksh...
?