Búsqueda por intervalos en excel

Buenas tardes
Cordial saludo
La presente para solicitar el favor de que me ayuden con una inquietud que tengo. Lo que pasa es que me han pedido que programe un ejercicio en excel y ya tengo un código base. En dicho código está explícito que se deben cumplir unas condiciones para llegar a encontrar la solución de una ecuación a partir de dos puntos o coordenadas que da el usuario y a partir de allí se comienza a biseccionar el intervalo conformado por los dos puntos hasta llegar a la solución. El código es el siguiente.
Sub calcularaiz()
x1 = Range("$B$1")
x2 = Range("$B$2")
x3 = Range("$B$3")
Range("$B$3").Formula = "=xTRES($B$1,$B$2)"
fx1 = Range("$B$4")
Range("$B$4").Formula = "=función($B$1)"
fx3 = Range("$B$5")
Range("$B$5").Formula = "=función($B$3)"
fx3fx1 = Range("$B$6")
Range("$B$6").Formula = "=$B$4*$B$5"
If Range("$B$6").Value < 0 Then Range("$B$2").Value = Range("$B$3").Value
ElseIf
Range("$B$6").Value > 0 Then Range("$B$1").Value = Range("$B$3").Value
Else: SolverOK SetCell:=Range("$B$5"), MaxMinVal:=3, ValueOf:=0, ByChange:=Range("$B$3")
End If
End Sub
El problema que tengo es que no he logrado que se realicen las iteraciones y me exigen que ese proceso esté automatizado. De antemano les agradezco mucho la ayuda que me puedan brindar al respecto y estaré atenta a su respuesta.
Muchas gracias por su atención
Atentamente
Clara Romero