run macro error, please help
 

Dear advance excel user:

I had a small vb macro, try to solve 2 qadratic eq with 2 variable

----------------------------------------------------------------


Sub Macro1()

'To run a macro in Excel, you must set the Solver reference in
VBA/Tools/References

'sets variables cells, there is not objective in your system of
nonlinear equations
ret = SolverOk(MaxMinVal:=1, ValueOf:="0", ByChange:="$E$7:$F$7")
'adds constraints.
ret = SolverAdd(CellRef:="$E$9:$E$10", Relation:=2,
FormulaText:="$F$9:$F$10")
'solves problem
SolverSolve

End Sub

------------------------------------------------------------------
when I run it , a window popup say internal error, exhaust memroy

what may go wrong?
please help
eric