SolverGet Function

Returns information about current settings for Solver. The settings are specified in the Solver Parameters and Solver Options dialog boxes.

Note The Solver add-in is not enabled by default. Before you can use this function, you must have the Solver add-in enabled and installed. For information about how to do that, see Using the Solver VBA Functions. After the Solver add-in is installed, you must establish a reference to the Solver add-in. In the Visual Basic Editor, with a module active, click References on the Tools menu, and then select Solver under Available References. If Solver does not appear under Available References, click Browse, and then open Solver.xlam in the \Program Files\Microsoft Office\Office14\Library\SOLVER subfolder.

SolverGet(TypeNum, SheetName)

TypeNum Required Integer. A number specifying the type of information you want. The following settings are specified in the Solver Parameters dialog box.

TypeNum Returns
1 The reference in the Set Target Cell box, or the #N/A error value if Solver has not been used on the active sheet.
2 A number corresponding to the Equal To option: 1 represents Max, 2 represents Min, and 3 represents Value Of.
3 The value in the Value Of box.
4 The reference (as a multiple reference, if necessary) in the By Changing Cells box.
5 The number of constraints.
6 An array of the left sides of the constraints, in text form.
7 An array of numbers corresponding to the relationships between the left and right sides of the constraints: 1 represents <=, 2 represents =, 3 represents >=, 4 represents int, and 5 represents bin.
8 An array of the right sides of the constraints, in text form.
13 True if the Simple LP Solving method is selected; False if another Solving method is selected.
20 True if the Make Unconstrained Variables Non-Negative check box is selected; False if it is cleared.

The following settings are specified in the Solver Options dialog box.

TypeNum Returns
9 The Max Time (Seconds) option (All Methods tab).
10 The Iterations option (All Methods tab).
11 The Constraint Precision option (All Methods tab).
12 The Integer Optimality (%) option (All Methods tab).
14 True if the Show Iteration Results check box is selected; False if it is cleared.
15 True if the Use Automatic Scaling check box is selected; False if it is cleared (All Methods tab).
16 A number corresponding to the type of estimates: 1 represents Tangent, and 2 represents Quadratic.
17 A number corresponding to the Derivatives option in the GRG Nonlinear tab: 1 represents Forward, and 2 represents Central (GRG Nonlinear tab).
18 A number corresponding to the type of search: 1 represents Newton, and 2 represents Conjugate.
19 The Convergence tolerance (GRG Nonlinear tab and Evolutionary tab).
21 The Population Size option (GRG Nonlinear tab and Evolutionary tab).
22 The Random Seed option(GRG Nonlinear tab and Evolutionary tab).
23 True if the Use Multistart check box is selected; False if it is cleared (GRG Nonlinear tab).
24 True if the Require Bounds on Variables check box is selected; False if it is cleared (GRG Nonlinear tab and Evolutionary tab).
25 The Mutation Rate option (Evolutionary tab).
26 The Max Subproblems option (All Methods tab).
27 The Max Feasible Solutions option (All Methods tab).
28 The Ignore Integer Constraints option (All Methods tab).
29 The Maximum Time without Improvement option (Evolutionary tab).

SheetName Optional Variant. The name of the sheet that contains the Solver model for which you want information. If SheetName is omitted, this sheet is assumed to be the active sheet.

Example

This example displays a message if you have not used Solver on Sheet1.

Worksheets("Sheet1").Activate 
state = SolverGet(TypeNum:=1) 
If IsError(State) Then 
 MsgBox "You have not used Solver on the active sheet" 
End If

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.