自动计算由VBAmacrosclosures

这更像是一个好奇而不是紧急：我有下面的代码，在一个更大的macros中重复几次。 我发现，如果我指定search方法 （通过包含“引擎：= ..”），macros将closures自动计算 （在公式>计算选项中find ）并将其切换到手动。 即使下面的优化是在一个循环，因为它优化到不同的值，这基本上固定在一个点的optimsation。 由于这个问题，彼此链接的单元格不会更新，这使得优化无用。 我可以运行macros而不指定search方法，但理想情况下，我希望能够select它。 有任何想法吗？

SolverReset SolverOK SetCell:="$K$21", MaxMinVal:=1, ValueOf:="0", ByChange:="$D$41:$H$41", Engine:=2 SolverAdd CellRef:="$K$25", Relation:=2, FormulaText:="1" SolverAdd CellRef:="$D$41:$H$41", Relation:=3, FormulaText:="0" SolverAdd CellRef:="$D$41:$H$41", Relation:=3, FormulaText:="$D$12:$H$12" SolverAdd CellRef:="$D$41:$H$41", Relation:=1, FormulaText:="$D$13:$H$13" SolverSolve UserFinish:=True SolverFinish KeepFinal:=1 Range("K23").Value = Range("K21").Value