Ich möchte ein vollautomatisiertes Solver-Script schreiben und komme auf keinen grünen Zweig. Mein Programmcode lautet wie folgt:
SolverReset
SolverOk SetCell:="$C$26", MaxMinVal:=2, ValueOf:=0, ByChange:="$D$25", Engine _
:=1, EngineDesc:="GRG Nonlinear"
SolverAdd CellRef:="D25", Relation:=1, FormulaText:="1000"
SolverAdd CellRef:="D25", Relation:=3, FormulaText:="1"
SolverSolve UserFinish:=True
C26 soll minimiert werden, indem D25 variiert wird, wobei D25 zwischen 1 und 1000 liegen soll. Nun habe ich das Problem, dass der Solver die zweite Nebenbedingung D25>1 nicht aufnimmt. Wenn ich aber
SolverAdd CellRef:="D25", Relation:=3, FormulaText:="2"
schreibe, dann wird die Nebenbedingung aufgenommen. Was mache ich falsch? Oder ist der Programmcode komplett falsch geschrieben?
Besten Dank und vielen Dank für die Hilfe im Voraus!!!
|