Я пытаюсь создать петлю? - PullRequest
0 голосов
/ 24 января 2019

Я записал макрос, в котором я запускаю Солвер.

Установите для цели $ F $ 10 значение Мин.

Путем изменения $ F $ 10

Ограничения: $ DB $ 97 <= 20 $ FB $ 10> = 0

Я хотел бы изменить код VBA таким образом, чтобы функция повторялась для разных ссылок на ячейки. Тем не менее, я очень новичок в этом и не совсем уверен, куда идти дальше. Я думаю, что правильная терминология заключается в том, что я хочу создать цикл. Буду признателен за любые указания или указания.

Я только начал пытаться изучать VBA. У меня для справки VBA для Modelers 5th edition.

Sub PleaseWork()
'
' PleaseWork Macro
'

'
    SolverOk SetCell:="$F$10", MaxMinVal:=2, ValueOf:=0, ByChange:="$F$10", Engine _
        :=3, EngineDesc:="Evolutionary"
    SolverOk SetCell:="$F$10", MaxMinVal:=2, ValueOf:=0, ByChange:="$F$10", Engine _
        :=3, EngineDesc:="Evolutionary"
    SolverSolve
    ActiveWindow.SmallScroll Down:=-6
End Sub

В частности, я бы хотел на следующей итерации заменить "$ F $ 10" на "$ F $ 11" ...

  1. Код SolverOK кажется здесь избыточным.
  2. Кажется, здесь отсутствует фрагмент кода. $ DB $ 97 в Солвере имеет значение <= 20, но отсутствует в записанном коде макроса. Я также хотел бы, чтобы следующая итерация заменила $ DB $ 97 на $ DC $ 98 ... </li>
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...