小编Val*_*l.F的帖子

每当我尝试使用它时，以下代码行都会给我 Sub 或 Function not defined 。我试过仔细检查我的拼写，重命名它，在线查找其他问题（大多数其他错误是忘记在工作表或工作表后添加 s），但我不知道我的代码有什么问题。我最初是从宏记录器中获得此代码的。

我在不同的工作表上多次使用这个子，但这并没有影响我的其他类似的子。

Sub SolverSolver()

    SolverOk SetCell:="$G$3", MaxMinVal:=2, ValueOf:=0, ByChange:="$G$4,$G$6", _
        Engine:=1, EngineDesc:="GRG Nonlinear"
    SolverSolve

End Sub

也许它的使用方式有问题，所以我在下面添加了它的调用方式。这一行在简单命令的一个大子中，比如给一个单元一个名字，这个大的简单子也重复多次。但是，即使尝试通过直接通过开发人员选项卡运行 sub 来运行它，它仍然有相同的错误，所以我认为这不是调用 sub 的方式。

ActiveSheet.Buttons.Add(630.75, 52.5, 74.25, 26.25).OnAction = "SolverSolver"

任何帮助将不胜感激！