У меня есть следующий фрагмент кода Excel VBA для решения проблемы минимизации:
SolverOk SetCell:="$AP$13", MaxMinVal:=2, ValueOf:=0, ByChange:="$AP$9:$AP$11", Engine:=1
SolverSolve UserFinish:=True
Это было создано с помощью команды меню «макрос записи» в Excel. Если я запускаю проблему из строки меню, используя Data | Солвер, а потом Солвер радостно меняет все три ячейки и завершает задачу. То же самое происходит, если я запускаю макрос из EXCEL (используя Alt-F8). Тем не менее, я назначил тот же макрос кнопке VBA, и когда я нажимаю этот Excel, изменяется только ячейка A9. Я получаю ту же проблему, если я изменяю код на
SolverOk SetCell:="$AP$13", MaxMinVal:=2, ValueOf:=0, ByChange:="$AP$10:$AP$11", Engine:=1
Я попытался сбросить проблему с помощью SolverReset, но это выдает ошибку, говорящую, что Excel был исчерпан.
Буду признателен за любые предложения о том, как заставить Excel изменить все три ячейки, а не только ячейку A9
.
Спасибо!