2.3.4 Модель управления запасами

Вводим исходные значения , т.е. значения покупки продавцом журналов, продажи этих журналов и возврата в типографию в случае не реализации товара. Ввод всего этого производится в диалоговом окне, которое создается как UserForm со специальными кнопками и полями ввода покупки журналов, продажи, и возврата к типографию. Окно ввода выглядит так:

Составляем таблицу состоящую из обьема реализации, числа событий, и вероятности этих событий, первые два нам даны по условию а вероятность этих событий нужно посчитать. Вводим в ячейку D7 следующую формулу вычисления вероятностей {=D6/СУММ($D$5:$I$5)}

и растягиваем маркер до ячейки I7.

В ячейках C10:H15 спомощью ф-ции пользователя CALC Вычисляем финансовые исходы при всевозможных вариантых событий покупки журналов и их реализации

Function CALC(buy As Variant) As Variant

Dim Цена_продажы, Цена_покупки, Цена_возврата, NRows, i, j As Integer, Result() As Integer

NRows = buy.Rows.Count

Цена_продажы = Range("a2").Value

Цена_покупки = Range("b2").Value

Цена_возврата = Range("c2").Value

ReDim Result(NRows, NRows)

For i = 1 To NRows

For j = 1 To NRows

If i <= j Then Result(i, j) = buy(i) * (Цена_продажы - Цена_покупки)

If i > j Then Result(i, j) = buy(j) * (Цена_продажы - Цена_покупки) - (buy(i) - buy(j)) * (Цена_покупки - Цена_возврата)

Next j

Next i

CALC = Result

End Function

В ячейках J11:J16 с помощью формулы {=МУМНОЖ(C10:H15;ТРАНСП(D7:I7))} находим ожидаемую прибыль, соответсввующую различным вариантам покупки журналов.

В ячейке F16 спомощью формулы =НАИБОЛЬШИЙ(J11:J16;1)

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

=Макс(J11:J16)

В ячейке F17 по формуле =(ПОИСКПОЗ(НАИБОЛЬШИЙ(J11:J16;1);J11:J16;0)-1)*5

соответствующий оптимальный обьем покупок газет. Затем функция CALC выводит эти оптимальные значения в окне сообщений.

Ф-ция наибольший возвращает К-е наибольшее значение из множества данных . Эта ф-ция используется для того чтобы выбрать значение по его относительному местоположению. Например, фунуцию НАИБОЛЬШИЙ можно использовать для того чтобы определить наилучший, второй, третий результат в балах, показанный при тестировании. Систаксис программы такой:

НАИБОЛЬШИЙ(массив;К) где Массив – это массив или диапазон ячеек где определяется наибольшее значение, к – позиция (начиная с наибольшей) в массиве или диапазоне.

Все результаты занесенные в таблицу будут выглядеть следующим образом:

 

 

П р о д а ж а

 

 

 

П

 

0 4 8 12 14 18

о

0 0 0 0 0 0 0 Покупка Прибыль

к

4

0 0 0 0 0 0 0 - р.

у

8 0 -20 16 16 16 16 4 - р.

п

12 0 -40 -4 32 32 32 8 12,94р.

к

14 0 -60 -24 12 48 48 12 16,88р.

а

18 0 -70 -34 2 38 56 14 9,00р.
Максимальная прибыль 16,88р. 18 0,28р.
Оптимальный обьем 15

 

 


Информация о работе «Решение экономических задач с помощью VBA»
Раздел: Информатика, программирование
Количество знаков с пробелами: 40236
Количество таблиц: 10
Количество изображений: 2

Похожие работы

Скачать
19460
11
10

... (нынешняя) стоимость или общая сумма, которая на настоящий равноценна серии будущих выплат; Тип - 0 или 1, Если 0 – оплата производится в конце периода, если 1, то в начале. В данной задаче функции приобретают вид ЧПС(0;D2;E2;F2) и БС(I2;B2;;-C2). 4.   С помощью функции Подбор параметра определена ставка, при которой выгоднее деньги вложить в инвестиционный проект 8,5%. 1.   Внесены исходные ...

Скачать
24770
1
12

... Visual Basic в Excel 2. Главные правила синтаксиса VBA Синтаксис VBA, как понятно из самого названия этого языка (которое расшифровывается как Visual Basic for Applications), почти полностью совпадает с синтаксисом Visual Basic. Некоторые основные синтаксические принципы этого языка: VBA нечувствителен к регистру; чтобы закомментировать код до конца строки, используется одинарная кавычка ...

Скачать
131850
28
13

... , в ней сочетаются лучшие средства для управления, делопроизводства, финансов, бухгалтерии предприятия. В данной дипломной работе предложен метод оценки экономической целесообразности производства ПЭВМ с помощью электронной модели, созданной с помощью одного из компонентов MS Office программы MS Excel (электронные таблицы). 2. ПРИМЕНЕНИЕ ЭЛЕКТРОННЫХ ТАБЛИЦ MS EXCEL ДЛЯ СОЗДАНИЯ ЭЛЕКТРОННОЙ МОДЕЛИ ...

Скачать
172056
0
5

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

0 комментариев


Наверх