Добрый день всем!
Прошу помощи вот в таком вопросе - при использовании инструмента "Поиск решения в VBA", как можно сделать динамическое целевое значение? Чтобы не писать его руками, а сделать ссылку на ячейку
При таком коде - выдает ошибку модели"
Спасибо!
Прошу помощи вот в таком вопросе - при использовании инструмента "Поиск решения в VBA", как можно сделать динамическое целевое значение? Чтобы не писать его руками, а сделать ссылку на ячейку
При таком коде - выдает ошибку модели"
Код |
---|
SolverReset SolverOk SetCell:="$J$65", MaxMinVal:=3, ValueOf:="$J$53", ByChange:="$J$58:$J$63", _ Engine:=1, EngineDesc:="GRG Nonlinear" SolverAdd CellRef:="$J$58", Relation:=1, FormulaText:="$O$44" SolverAdd CellRef:="$J$58", Relation:=3, FormulaText:="$N$44" SolverAdd CellRef:="$J$59", Relation:=1, FormulaText:="$O$45" SolverAdd CellRef:="$J$59", Relation:=3, FormulaText:="$N$45" SolverAdd CellRef:="$J$60", Relation:=1, FormulaText:="$O$46" SolverAdd CellRef:="$J$60", Relation:=3, FormulaText:="$N$46" SolverAdd CellRef:="$J$61", Relation:=1, FormulaText:="$O$47" SolverAdd CellRef:="$J$61", Relation:=3, FormulaText:="$N$47" SolverAdd CellRef:="$J$62", Relation:=1, FormulaText:="$O$48" SolverAdd CellRef:="$J$62", Relation:=3, FormulaText:="$N$48" SolverAdd CellRef:="$J$63", Relation:=1, FormulaText:="$O$49" SolverAdd CellRef:="$J$63", Relation:=3, FormulaText:="$N$49" SolverOk SetCell:="$J$65", MaxMinVal:=3, ValueOf:="$J$53", ByChange:="$J$58:$J$63", _ Engine:=1, EngineDesc:="GRG Nonlinear" SolverSolve |
Спасибо!