應該可以阿,先打開MACRO錄製,再SOLVER,最後STOP MACRO錄製。 SOLVER就在錄製MACRO裏麵了。 這是我試的簡單公式,不是你的求利潤最大化問題。 Sub Macro1() SolverOk SetCell:="$A$5", MaxMinVal:=3, ValueOf:="0", ByChange:="$A$1" SolverSolve End Sub