EJECUTAR SOLVER DESDE UN BOTON

¡ Hola !
Tengo una macro con solver donde necesito que no se detenga a preguntarme si
acepto la solución propuesta.
La solución que me ofrezca debe ser aceptada sin detenerse y continuar con
los siguientes pasos de la macro.
Si alguien tiene alguna idea, agradezco sus comentarios.
El excel que estoy ejecutando es el 2013

Sub LanzaSolver()
Application.ScreenUpdating = False
Application.SendKeys "%D"
Application.SendKeys "y4"
Application.SendKeys "%s", True
Application.SendKeys "{TAB}"
Application.SendKeys "{ENTER}"
Application.SendKeys "{ENTER}"
Application.ScreenUpdating = True
End Sub

Gracias de antemano