2011-10-12 136 views
2

的“使无约束变量非负”选项后 SolverResetVBA:似乎无法关闭的求解

我要关掉制作无约束变量非负选择在VBA求解。

什么是关掉制作无约束变量非负的解算器的命令?

我尝试录制宏,找出但我得到的是,

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 

回答

2

当录制“规划求解”的宏,在打开的计算窗口的选项选项卡,然后关闭。单击求解,然后“停止录制”这应该给“SLOVER选项”,如下图,你需要的选项AssumeNonNeg:=假(或真)本所要求

SolverOptions MaxTime:=0, Iterations:=0, Precision:=0.000001, Convergence:= _ 
     0.0001, StepThru:=False, Scaling:=True, AssumeNonNeg:=False, Derivatives:=1 
    SolverOptions PopulationSize:=100, RandomSeed:=0, MutationRate:=0.075, Multistart _ 
     :=False, RequireBounds:=True, MaxSubproblems:=0, MaxIntegerSols:=0, _ 
     IntTolerance:=1, SolveWithout:=False, MaxTimeNoImp:=30 
6

你想要做什么是添加:

SolverOptions Assumenonneg:=False 

的所有求解选项的完整详情,可MSDN找到