Блог

Он добавляет мою цель и диапазон моих переменных. Он не добавляет ограничения. Я не могу понять это.

  SolverReset
        SolverOK setCell:=Range("Objective1"), _
            maxMinVal:=1, _
            byChange:=Range("VarChange1")
        SolverAdd cellRef:=Range("ExpenseSum1"), Relation:=1, FormulaText:="allocationAmount"
        SolverAdd cellRef:=Range("VarChange1"), Relation:=1, FormulaText:="allocationDivided"
        SolverAdd cellRef:=Range("VarChange1"), Relation:=3, FormulaText:="Difference6"
        
        
        
        
        SolverSolve userFinish:=False