=(A4*A4)*234+(A4*123)+2345
while range("B4")<>0
Range("B4").GoalSeek Goal:=0, ChangingCell:=Range("A4")
wend
If you just want to use basic Excel functions without loops, your equation would look something like this :-
Code:=(A4*A4)*234+(A4*123)+2345
Public Function QuadSolvePlus(a, b, c As Double)
QuadSolvePlus = (-b + Sqr(b ^ 2 - (4 * a * c))) / (2 * a)
End Function
Public Function QuadSolveMinus(a, b, c As Double)
QuadSolveMinus = (-b - Sqr(b ^ 2 - (4 * a * c))) / (2 * a)
End Function
Mr Excel.xls | ||||||
---|---|---|---|---|---|---|
A | B | C | D | |||
1 | 2 | 1.5911E-05 | ||||
2 | ||||||
Equation |