Режим увеличения объема продаж
К следующему элементу управления по изменению уровня объема продаж предъявлены похожие требования:
изменение содержимого ячейки С9 с шагом 1% и 10%;
начальное (минимальное) значение 0%;
максимальное значение 250%;
быстрое перемещение в начальное или конечное значение, а также в любую точку выбранного диапазона;
автоматический подбор параметра (значения) в ячейке С14, показывающий — на сколько процентов необходимо уменьшить уровень издержек, чтобы достичь такого же уровня прибыли при любом исходном соотношении продажи/затраты от нуля до 100%;
формирование текста — в состоянии какого режима расчета находится созданная модель.
Отличие элемента управления изменения уровня объема реализации в том, что он помещает результат в ячейку I10 и ему назначен макрос УвеличениеПродаж (рис. 12.8.).
Перед записью макроса введите формулы в ячейки С6, С9 и С14:
=I5 (12.4)
=I10/100 (12.5)
=(C6-C16)/C6 (12.6)
и в ячейку F19 введите текст Режим изменения объема продаж.
Подпрограмма несколько отличается от предыдущей, но алгоритм ее записи и редактирования не отличается. Описание последовательности выполнения действий подпрограммой УвеличениеПродаж:
проверить содержимое ячейки F19 и если в нее введен текст Режим изменения уровня издержек, то выполнить подпрограмму ИсходноеСостояние, которая обновит все формулы таблицы (приведет в исходное состояние) и очистит содержимое ячейки F19 с введенным текстом. После этого переходит к выполнению следующей строки кода VBA;
если же в ячейке F19 не содержится ничего или введены другие данные, то перейти к выполнению следующей строки, игнорируя выполнение подпрограммы УвеличениеПродаж;
ввести в ячейку F19 текст Режим изменения уровня издержек;
в ячейку С6 ввести ссылку на ячейку I6 (заданный уровень затрат в выручке при исходном состоянии). Содержимое ячейки I6 изменяется при помощи следующего элемента управления и будет раскрыто далее.
в ячейку С9 (процент увеличения объема продаж) ввести формулу деления содержимого ячейки I10 на 100. Содержимое ячейки I10 изменяется с помощью элемента управления Полоса прокрутки;
в ячейку С14 (процент изменения уровня затрат) вводится формула, производящая вычитание значения затрат, полученное после изменения издержек (ячейка С16) из значения затрат в исходном состоянии (ячейка С6), после чего результат делится на сумму затрат исходного состояния (ячейка С6);
значению (Value) в ячейке С16 присваивается прежнее значение этой же ячейки, которое находилось в ней до выполнения подпрограммы за минусом значения, возвращаемого формулой в ячейке С21, которая сравнивает полученную дополнительную прибыль от изменения уровня объема продаж. Обратите внимание — в ячейку С16 вводится не формула, а значение. Это объясняется тем, что в ячейку нельзя вводить формулу, которая бы ссылалась на саму себя. И далее — на ячейку С16 присутствует ряд ссылок в формулах других ячеек, вводимых с помощью кнопки ИсходноеСостояние. Поэтому в конечном итоге значение ячейки С16 обновляет значение, возвращаемое формулой в ячейке С20, в результате чего результат вычисления в ячейке С21 равен нулю, что говорит о правильном подборе параметра..
Таким образом, изменяя при помощи элемента управления значение увеличения объемов продаж на определенный процент по сравнению с исходными данными, в ячейке С14 будет виден уровень, на который необходимо уменьшить затраты, чтобы достичь такого же увеличения дополнительно полученной прибыли.
Рис. 12.8. Подпрограмма УвеличениеПродаж, переключающая модель в режим увеличения объема продаж и подбора требуемого уменьшения объема затрат для достижения того же результата