Description
Same as the SolverOK function, but also displays the Solver dialog box.
Before you use this function, you must establish a reference to the Solver add-in. With a Visual Basic module active, click References on the Tools menu, and then select the Solver.xla check box in the Available References box. If Solver.xla doesn't appear in the Available References box, click Browse, click Solver in the \Excel\Library\Solver folder, and then click OK.
Syntax
SolverOkDialog(setCell, maxMinVal, valueOf, byChange)
setCell
Optional. Refers to a single cell on the active worksheet. Corresponds to the Set Target Cell box in the Solver Parameters dialog box.
maxMinVal
Optional. Corresponds to the Max, Min, and Value Of options in the Solver Parameters dialog box.
maxMinVal
Specifies
1
Maximize
2
Minimize
3
Match specific value
valueOf
Optional. If MaxMinVal is 3, you must specify the value to which the target cell is matched.
byChange
Optional. The cell or range of cells that will be changed in order to obtain the desired result in the target cell. Corresponds to the By Changing Cells box in the Solver Parameters dialog box.
See Also
SolverOk Function.
Example
This example loads the previously calculated Solver model stored on Sheet1, resets all Solver options, and then displays the Solver Parameters dialog box. From this point on, Solver can be used manually.
Worksheets("Sheet1").Activate
SolverLoad loadArea:=Range("A33:A38")
SolverReset
SolverOKDialog setCell:=Range("TotalProfit")
SolverSolve userFinish:=False