Hallo Leute,
gibt es eine pausible erklärung dass ergebnisse die in VBA durch den Solver berechnen werden von den realen ergebnissen die ich ebenfalls per solver berechnet habe abweichen?
habe den solver code per makro aufgenommen, was in einem loop ausgeführt wird, aber schon die erste berechnung stimmt nicht. wenn ich per hand die ergebenisse berechnen lasse unterscheiden sie sich den ergebnissen meines VBA Makro
SolverReset
SolverOk SetCell:="$Zielfeld", MaxMinVal:=2, ValueOf:=0, ByChange:= _
"$Spaltenbuchstabe$Spaltennummer:$Spaltenbuchstabe$Nummerspalte", Engine:=1, EngineDesc:="GRG Nonlinear"
SolverAdd CellRef:="$Spaltenbuchstabe$Spaltennummer", Relation:=2, FormulaText:="1"
SolverOk SetCell:="$Spaltenbuchstabe$Spaltennummer", MaxMinVal:=2, ValueOf:=0, ByChange:= _
"$Spaltenbuchstabe$Spaltennummer:$Spaltenbuchstabe$Spaltennummer", Engine:=1, EngineDesc:="GRG Nonlinear"
SolverOptions Assumenonneg:=False
SolverOk SetCell:="$Spaltenbuchstabe$Spaltenbuchstabe", MaxMinVal:=2, ValueOf:=0, ByChange:= _
"$Spaltenbuchstabe$Spaltennummer:$CW$Spaltennummer", Engine:=1, EngineDesc:="GRG Nonlinear"
SolverSolve True
MfG
Dieter
|