Bypassing the Solver Result confirmation... 1

[ETID]

Is there a more elegent way of not showing the solver result screen?

I forced the sendkeys command in this example..it works but I feel the code could trip over itself on a faster machine.



Range("E20&quot.Select
SolverOk SetCell:="$E$20", MaxMinVal:=1, ValueOf:="0", ByChange:="$E$21"
Application.SendKeys "{Enter}"
Solversolve

 

[origapizni]

replace the SendKeys line with

SolverSolve UserFinish:=True

 

[ETID]

Excellent...thanks