私はいくつかの行でソルバを繰り返すループを作ろうとしていますが、私のコードを動作させることはできません。誰か私が逃していることを知っていますか？トリッキーな部分は、私は細胞の範囲（L3を変更することによって（T3）を最小化しようとしている：M3）。 Dim count As Integer
Set count = 3
Do While count <= 100
SolverOk se
私は、一連の解の条件に対して線形不等式を解こうとしています。たとえば： syms p C L D W
assume([p, C, W, D, L] >= 0)
eqn5 = p*C + L - D < 0;
eqn6 = p*C > 0;
solp2 = solve([eqn5, eqn6], [p, C, W, D, L], 'ReturnConditions', true);
Sol