SolverAdd不起作用

时间:2016-02-29 16:16:30

标签: vba solver

我的VBA代码中的solverAdd语句不起作用。 它是这样的:

SolverReset
SolverOkDialog SetCell:=Range("$C$98"), MaxMinVal:=1, ByChange:=Range("$L$2:$L$85"), Engine:=1, EngineDesc:="GRG Nonlinear"
SolverAdd CellRef:=Range("$L$2", "$L$" & cut_point), Relation:=3, FormulaText:="$D$96"
SolverAdd CellRef:=Range("$L$2:$L$85"), Relation:=5
SolverAdd CellRef:=Range("$D$95"), Relation:=1, FormulaText:="$C$95"
SolverSolve UserFinish:=True
SolverFinish KeepFinal:=1
SolverReset

但是在实现时,excel中的求解器窗口总是会弹出并要求我输入约束。

真的很感激帮助!

1 个答案:

答案 0 :(得分:0)

SolverReset就是这样:重置一切 因此,请从代码中删除第二个SolverReset HTH