解算器在Excel中无法正常运行

我对Excel解算器有问题。有一个线性方程组，使用单纯形法求解，当使用宏运行解算器时，它无法找到可行的解，当手动运行或继续运行时，甚至可以通过编程方式找到解

这是运行解算器的代码

Sub sss()
    SolverOk SetCell:="$M$10", MaxMinVal:=2, ValueOf:=0, ByChange:="$A$1:$L$1", _
        Engine:=2, EngineDesc:="Simplex LP"
    SolverOk SetCell:="$M$10", MaxMinVal:=2, ValueOf:=0, ByChange:="$A$1:$L$1", _
        Engine:=2, EngineDesc:="Simplex LP"
    Dim r As Integer
    r = SolverSolve(False)
End Sub

这是桌子

这些是解算器的参数

这是在程序化运行之后

---

手动运行后，它运行正常，并找到解决方案，我不明白。我注意到：

子sss（）的第2-3行和第4-5行是相同的

您传递MaxMinValue:=2和ValueOf:=0，但在对话框中选择Min（这应该是MaxMinValue:=1？？）

---

我想要你的工作表。

在这种情况下，ValueOf并不重要，Min应该是2