SolverLoad Function

Загружает существующие параметры модели Решателя, сохраненные на листе.

Примечание Надстройка "Решатель" не включена по умолчанию. Прежде чем использовать эту функцию, необходимо включить и установить надстройку Решателя. Сведения о том, как это сделать, см. в разделе Использование функций Решателя VBA. После установки надстройки "Поиск решения" необходимо установить ссылку на надстройку "Поиск решения". В редакторе Visual Basic с активным модулем щелкните Ссылки в меню Сервис, а затем выберите пункт Поиск решения в разделе Доступные ссылки. Если пункт поиск решения не отображается в разделе Доступные ссылки, нажмите кнопку Обзор и откройте элемент Solver.xlam во вложенной папке \Program Files\Microsoft Office\Office14\Library\SOLVER.

SolverLoad( LoadArea, Merge)

LoadAreaОбязательный вариант. Ссылка на активном листе на диапазон ячеек, из которых требуется загрузить полную спецификацию проблемы. Первая ячейка в LoadArea содержит формулу для поля Задать целевую ячейку в диалоговом окне Параметры решателя . вторая ячейка содержит формулу для поля Изменение ячеек ; последующие ячейки содержат ограничения в виде логических формул. Последняя ячейка при необходимости содержит массив значений параметров Решателя. Дополнительные сведения см. в разделе SolverOptions. Диапазон, представленный аргументом LoadArea , может находиться на любом листе, но необходимо указать лист, если он не является активным. Например, загружает модель из Sheet2, SolverLoad("Sheet2!A1:A3") даже если она не является активным листом. Объединить Необязательный вариант Variant. Логическое значение, соответствующее кнопке Объединить или Заменить в диалоговом окне, которое появляется после выбора ссылки LoadArea и нажатиякнопки ОК. Если задано значение True, выбор и ограничения ячеек переменных из LoadArea объединяются с текущими определенными переменными и ограничениями. Если значение False или опущено, текущие спецификации и параметры модели удаляются (что эквивалентно вызову функции SolverReset ) перед загрузкой новых спецификаций.

Пример

В этом примере загружается ранее вычисляемая модель Решателя, хранящуюся на Листе 1, изменяется одно из ограничений, а затем модель снова решается.

Worksheets("Sheet1").Activate 
SolverLoad loadArea:=Range("A33:A38") 
SolverChange cellRef:=Range("F4:F6"), _ 
 relation:=1, _ 
 formulaText:=200 
SolverSolve userFinish:=False

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.