vba:似乎无法关闭Solver的"使无约束变量非负"选项

Question

在SolverReset之后

我想在vba Solver中关闭Make Unconstrained Variables Non-Negative选项.

在解算器中关闭"使无约束变量非负"的命令是什么？

我试着录制一个宏来查找,但我得到的只是,

Sub Macro2()
'
' Macro2 Macro
'

'
    SolverOk SetCell:="$D$26", MaxMinVal:=2, ValueOf:=0, ByChange:="$B$9:$B$12", _
        Engine:=1, EngineDesc:="GRG Nonlinear"
    SolverOk SetCell:="$D$26", MaxMinVal:=2, ValueOf:=0, ByChange:="$B$9:$B$12", _
        Engine:=1, EngineDesc:="GRG Nonlinear"
    SolverSolve
End Sub

Answer 1

你想要做的是添加:

SolverOptions Assumenonneg:=False

有关所有求解器选项的完整详细信息,请参阅MSDN.