加载已保存到工作表的现有规划求解模型参数。
注意 默认情况下未启用规划求解加载项。 在可以使用此函数之前,必须已安装且已启用规划求解加载项。 有关如何执行该操作的信息,请参阅使用规划求解 VBA 函数。 安装规划求解加载项之后,必须创建对该规划求解加载项的引用。 在 Visual Basic 编辑器中,如果模块处于活动状态,请单击“工具”菜单上的“引用”,然后在“可用的引用”下选择“规划求解”。 如果“规划求解”没有显示在“可使用的引用”下面,请单击“浏览”,然后打开 \Program Files\Microsoft Office\Office14\Library\SOLVER 子文件夹中的 Solver.xlam。
SolverLoad ( LoadArea、 Merge)
LoadArea 必需 Variant。 活动工作表上对要从中加载完整问题规范的单元格范围的引用。 LoadArea 中的第一个单元格包含“规划求解参数”对话框中“设置目标单元格”框的公式;第二个单元格包含“通过更改单元格”框的公式;后续单元格包含逻辑公式形式的约束。 最后一个单元格可能包含规划求解选项值的数组。 有关详细信息,请参阅SolverOptions。 参数 LoadArea 表示的区域可以位于任何工作表上,但如果工作表不是活动工作表,则必须指定该工作表。 例如,即便不是活动工作表,SolverLoad("Sheet2!A1:A3") 也可从 Sheet2 加载模型。
Merge 为可选变量。 与对话框中的 “合并 ”按钮或 “替换 ”按钮对应的逻辑值,在选择 LoadArea 引用并单击“ 确定”后显示。 如果 为 True,则 LoadArea 中的变量单元格选择和约束将与当前定义的变量和约束合并。 如果 为 False 或省略,则在加载新规范之前,将擦除当前模型规范和选项 (等效于对 SolverReset 函数的调用) 。
示例
本示例加载以前计算过的规划求解模型(该模型保存于工作表 Sheet1 上),更改其中的一个约束,然后再次求解该模型。
Worksheets("Sheet1").Activate
SolverLoad loadArea:=Range("A33:A38")
SolverChange cellRef:=Range("F4:F6"), _
relation:=1, _
formulaText:=200
SolverSolve userFinish:=False
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。