8.5.Подбор параметров и поиск решения

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

Если вычисляемое по формуле значение зависит от единственного параметра, значение которого может изменяться, можно поставить перед Excel задачу подбора такого значения этого параметра, что результат вычислений в известной ячейке будет равен заданному значению. Если же на результат влияет содержимое нескольких ячеек, значение в каждой из которых может изменяться, или на решение накладываются какие-то условия, требуется найти максимальное или минимальное значения, то Excel должен решить задачу поиска решения.

Функции подбора параметра и поиска решения реализованы специальными надстройками Excel. Надстройка доступна, когда она загружена. Просмотреть список надстроек можно с помощью команды Надстройки… из меню Сервис.

При подборе параметра Excel ищет такое его значение, при котором формула, значение которой зависит от этого параметра, даст при вычислении заданный результат в указанной ячейке.

Для решения задачи подбора параметра следует выполнить следующую последовательность шагов:

• выделить ячейку, содержащую формулу, значения параметра которой нужно подобрать;

• выбрать в меню Сервис команду Подбор параметра… и в диалоговом окне команды задать условия ее выполнения: в поле «Установить в ячейке:» должна находиться ссылка на выделенную на первом шаге ячейку; в поле «Значение:» вводится требуемый результат вычисления по формуле, т.е. значение, которое должно быть получено в результате подбора параметра для заданной формулы; в поле «Изменяя значение ячейки:» вводится ссылка на ячейку, которая содержит изменяемый параметр формулы;

• щелкнуть кнопку OK для выполнения команды.

В результате выполнения команды будет выведено окно с результатами работы Excel. Если решение найдено, подобранное значение параметра будет вписано в отведенную для него ячейку.

Подбор параметра можно организовать программным путем, с помощью метода GoalSeek. Вызов этого метода выполняется по правилу:

Выражение.GoalSeek(Goal, ChangingCell)

где Выражение возвращает объект типа Range, представляющий единственную ячейку, содержащую формулу; аргументы определяют заданное значение для результата вычислений по формуле и ячейку, значение которой должно быть подобрано. Например, оператор:

Range("B1").GoalSeek Goal:=10, ChangingCell:=Range("A1")

подбирает значение параметра в ячейке “A1” так, чтобы результат вычисления по формуле, записанной в ячейке “B1”, был равен 10.

Функции моделирования и поиска решения более высокого уровня находятся в файле надстройки SOLVER.XLA поиска решения.

При решении задачи поиска решения можно изменять параметры поиска. Для определения условий решения задачи следует выполнить следующую последовательность шагов:

• выделить ячейку, содержащую формулу, для которой решается задача поиска решения, дающего заданное значение для указанной формулы;

• выбрать команду Поиск решения… в меню Сервис;

• в диалоговом окне команды задать условия ее выполнения:

• в поле «Установить целевую ячейку:» должно быть введено имя или адрес ячейки, содержащей формулу, значения параметров которой должны быть подобраны;

• с помощью группы переключателей «Равной:» нужно определить, на какой результат вычислений по указанной выше формуле следует ориентироваться (максимальное значение, минимальное значение или заданное конкретное значение); если выбран переключатель «значению:», то в соответствующем поле вводится это значение, которое и является целью поиска решения;

• в поле «Изменяя ячейки:» перечисляются ссылки на ячейки, значения которых могут изменяться при поиске нужного решения (диапазон смежных ячеек, ссылки на несмежные ячейки, перечисленные через символ ‘;’), щелчок по кнопке Предположить заставляет Excel автоматически составить список изменяемых ячеек, влияющих на результат;

• с помощью кнопки Добавить можно ввести ограничения на значения, подбираемых параметров (щелчок по этой кнопке раскрывает диалоговое окно, в котором можно задать дополнительные условия), сформированные условия отображаются в диалоговом окне, «лишние» условия можно удалить из списка, условия можно также изменить;

• кнопка Параметры позволяет задать параметры поиска решения.

Выполнение команды запускается кнопкой Выполнить. Результаты поиска решения отображаются в диалоговом окне. Найденное решение можно сохранить в указанных ячейках или восстановить в них исходные значения. Решение можно также сохранить как сценарий (работа с ними рассматривается ниже).

Поиск решения реализуется средствами, описанными в файле надстройки. Для определения всех параметров команды, которые следует задать при написании кода соответствующей инструкции на VBA, можно воспользоваться макрогенератором, записав нужный код «вручную» в режиме записи макроса. Например, следующие операторы

SolverOk SetCell:="$B$1", MaxMinVal:=3, _ ValueOf:="10", ByChange:="$A$1:$A$2"

SolverSolve

задают условия поиска решения: параметры подбираются для формулы, записанной в ячейке “B1”, в этой ячейке должно быть установлено конкретное значение (число 10), изменяемые значения находятся в диапазоне “A1:A2”; поиск решения начинается щелчком по кнопке OK и найденное решение сохраняется в указанных ячейках.

Более подробно функции, позволяющие программным способом получить доступ к возможностям надстройки «Поиск решения», можно изучить в разделе «Microsoft Excel Visual Basic Reference» («Functions») справочной системы Microsoft Excel Visual Basic.