0

ソルバーを使用して解決策を見つけています。私は自分の解が特定の範囲内にあることを常に知っています。この範囲を使用するようにソルバー (VBA) を設定するにはどうすればよいですか?

これは私のコードです。min ="A34" Max="A45" のような範囲を追加し、ソルバーにこの範​​囲内の解を見つけてもらいたいだけです。

SolverOk SetCell:=Range("massfr").Value, _
  MaxMinVal:=1, _
  ValueOf:="0", _
  ByChange:=Range("pdvary").Value 
SolverOptions AssumeNonNeg:=True 
SolverOk SetCell:=Range("massfr").Value, _
  MaxMinVal:=1, _
  ValueOf:="0", _
  ByChange:=Range("pdvary").Value
4

1 に答える 1

0

範囲から「.value」を削除します。私はそれが次のように見えるべきだと思います：

ByChange:=Range("pdvary")

完全なコード: (未テスト)

SolverOk SetCell:=Range("massfr"), _
  MaxMinVal:=1, _
  ValueOf:="0", _
  ByChange:=Range("pdvary") 
SolverOptions AssumeNonNeg:=True 
SolverOk SetCell:=Range("massfr"), _
  MaxMinVal:=1, _
  ValueOf:="0", _
  ByChange:=Range("pdvary")

詳細については、このリンクを参照してください。

于 2013-09-30T13:38:02.737 に答える