Mdeterm(A) in the following Macro will not function, any suggestions?
Sub testcall()
Dim A(2, 2)
[a12].Select
For i = 1 To 2 Step 1
For j = 1 To 2 Step 1
A(i, j) = i + j
Next
Next
md = Application.WorksheetFunction.MDeterm(A)
ActiveCell.Offset(i - 1, 4).Value = md
End Sub
Sub testcall()
Dim A(2, 2)
[a12].Select
For i = 1 To 2 Step 1
For j = 1 To 2 Step 1
A(i, j) = i + j
Next
Next
md = Application.WorksheetFunction.MDeterm(A)
ActiveCell.Offset(i - 1, 4).Value = md
End Sub