使用 Solver 编译问题

Compile issue using Solver

Sub Macro2()
'
' Macro2 Macro
'

'
    Range("G5").Select
    SolverOk SetCell:="$G", MaxMinVal:=2, ValueOf:=0, ByChange:="$G", Engine:=1 _
        , EngineDesc:="GRG Nonlinear"
    SolverOk SetCell:="$G", MaxMinVal:=2, ValueOf:=0, ByChange:="$G", Engine:=1 _
        , EngineDesc:="GRG Nonlinear"
    SolverSolve
End Sub

我收到一个消息框:

"Compile error: Sub or function not defined"

我猜消息指的是函数或子 SolverOk。

任何人都可以帮助我。提前致谢

您需要通过 VBA 菜单工具 > 引用创建对规划求解对象的引用。