Excel 솔버 - "ValueOf"입력 변경을 사용하여 최적화

Question

2 입력을 주어진 방정식을 매개 변수화 할 수있는 매크로를 설정하려고합니다. 나는 Solver가 "Value of"값으로 셀의 값을 사용하게하는 방법을 알 수 없다. 다음과 같이 내가 그 순간에있어 매크로는 다음과 같습니다

매크로 실행

Sub Macro2() 

    SolverReset 
    SolverAdd CellRef:="$G$2", Relation:=1, FormulaText:="100" 
    SolverAdd CellRef:="$G$2", Relation:=3, FormulaText:="0" 
    SolverOk SetCell:="$M$6", MaxMinVal:=3, ValueOf:="$B$2", ByChange:="$G$2", Engine:= _ 
     3, EngineDesc:="Evolutionary" 
    SolverSolve 

End Sub 

, 해 찾기 결과 상자 말 팝업 Error in model. Please verify that all cells and Constraints are valid.

내가하고 싶은 것을 달성하기 위해 어떤 방법이 있나요 ?

Answer 1

Nat.

"ValueOf"매개 변수에 대한 셀을 직접 참조하는 대신 참조 된 셀의 변수를 사용하십시오. 예 :

Sub Macro2() 

    Dim target As Double 
    target = Range("B2") 

    SolverReset 
    SolverAdd CellRef:="$G$2", Relation:=1, FormulaText:="100" 
    SolverAdd CellRef:="$G$2", Relation:=3, FormulaText:="0" 
    SolverOk SetCell:="$M$6", MaxMinVal:=3, ValueOf:=target, ByChange:="$G$2", _ 
     Engine:= 3, EngineDesc:="Evolutionary" 
    SolverSolve 

End Sub 

호프가 문제를 해결합니다.

감사합니다. 샐