Excel VBA教程:SolverReset函数

重新设置“规划求解参数”对话框中的所有单元格选定区域和约束条件,并将“规划求解选项”对话框中的所有设定恢复为默认值。该函数相当于单击“规划求解参数”对话框中的“全部重设”按钮。调用 SolverLoad函数时将自动调用 SolverReset函数。

使用本函数之前,必须建立对规划求解加载宏的引用。当 Visual Basic 模块处于活动状态时,单击“工具”菜单上的“引用”,再选中“可使用的引用”列表框中的“Solver.xla”复选框。如果“Solver.xla”未出现在“可使用的引用”列表框中,请单击“浏览”并打开“\Office\Library\Solver”子文件夹中的“Solver.xla”。

SolverReset( )

Excel VBA教程:SolverReset函数·示例

本示例在定义新问题之前,将规划求解重新设置为默认值。


Worksheets("Sheet1").Activate
SolverReset
SolverOptions Precision:=0.001
SolverOK SetCell:=Range("TotalProfit"), _
    MaxMinVal:=1, _
    ByChange:=Range("C4:E6")
SolverAdd CellRef:=Range("F4:F6"), _
    Relation:=1, _
    FormulaText:=100
SolverAdd CellRef:=Range("C4:E6"), _
    Relation:=3, _
    FormulaText:=0
SolverAdd CellRef:=Range("C4:E6"), _
    Relation:=4
SolverSolve UserFinish:=False
SolverSave SaveArea:=Range("A33")

上页:Excel VBA教程:SolverOptions函数 下页:Excel VBA教程:SolverSave函数

Excel VBA教程:SolverReset函数

Excel VBA教程:SolverSave函数 Excel VBA教程:SolverSolve函数
Excel VBA教程:SQLBind函数 Excel VBA教程:SQLClose函数
Excel VBA教程:SQLError函数 Excel VBA教程:SQLExecQuery函数
Excel VBA教程:SQLGetSchema函数 Excel VBA教程:SQLOpen函数
Excel VBA教程:SQLRequest函数 Excel VBA教程:SQLRetrieve函数
Excel VBA教程:SQLRetrieveToFile函数 Excel VBA教程:隐藏的语言元素
Excel VBA教程:向文档中添加控件 Excel VBA教程:向用户窗体中添加控件
Excel VBA教程:应用程序对象事件 Excel VBA教程:图表对象事件
Excel VBA教程:控件和对话框事件 Excel VBA教程:在某一 Microsoft Office 应用程序中控制其他 Microsoft Office 应用程序
Excel VBA教程:创建自定义对话框 Excel VBA教程:新建工作簿
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号