Страницы

вторник, 26 августа 2014 г.

Расчет стоимости ОПФ в MS Excel

Вычислить современную (на текущий год) стоимость основных фондов предприятия с учетом их износа и инфляции.
О каждом объекте известны год и цена приобретения. Стоимость каждого объекта уменьшается за счет износа на 10% в год за период от <Года приобретения> до текущего <Года> и увеличивается на величину <Инфляции> (положим, средняя инфляция составляет 30% в год). Сначала нужно вычислить вспомогательное значения:
  • Число лет инфляции в период эксплуатации объекта, с учетом того, что она возникла только с 1992 года.
  • Коэффициент инфляции – во сколько раз возросла стоимость объекта за счет инфляции. Его значение всегда 1 (1 – инфляция еще не повлияла).
  • Коэффициент износа – какая часть объекта еще не изношена. Его значение находится в диапазоне от 1 до 0 (0 – полный износ).
Имея эти данные, можно вычислить современную стоимость, как произведение исходной цены, коэффициента инфляции и коэффициента износа. При полном износе современная стоимость равна нулю. В этом случае в столбце G следует вывести не 0 руб., а слово “Списать”. В клетке C9 подсчитывается число списанных объектов. В области С10:С13 подсчитать современную суммарную стоимость фондов по “возрастным” категориям.
Контроль В5:B7:  Год приобретения > 1950г.
Форматирование G5:G7:  слово “Списать” на красном фоне.
График:  Название – Современная стоимость.
Решение.
Создаем документ – электронную таблицу в MS Excel. Переносим исходные данные на лист, форматируем ячейки, вносим значения в ячейки с названиями, стоимостью и годом выпуска изделий.


Посчитаем суммарную стоимость на момент приобретения. Нужно установить курсор на ячейку под столбиком цен и нажать кнопку «Автосумма» на панели инструментов.


В графе D подсчитаем количество лет инфляции. Инфляция возникла с 1992 года, поэтому для расчета нельзя использовать простое вычитание года выпуска из года текущего (в ячейке G1). Воспользуемся функцией ЕСЛИ. В качестве условия зададим, больше ли год выпуска 1992 года. Если больше, то число лет инфляции рассчитаем как разность между текущим годом и 1992, в противном случае это будет разность между текущим годом и годом выпуска:


Для расчета коэффициента износа также используем функцию ЕСЛИ:
=ЕСЛИ((1-$B$1*($G$1-B6))<0;0;1-$B$1*($G$1-B6)). То есть, если коэффициент износа меньше 0, то в ячейку вносится 0.

Считаем современную стоимость как произведение исходной цены, коэффициента износа и коэффициента инфляции. Если она равна 0, то выводим слово «Списать»:
ЕСЛИ(C6*E6*F6=0;"Списать";C6*E6*F6).
Кроме того, сделаем условное форматирование. Если в ячейке слово «Списать», то заливаем ее красным цветом:


Сделаем проверку ввода данных в ячейки «Год приобретения». Для этого воспользуемся инструментом «Проверка». Установим следующие параметры:




Попытаемся ввести неверное значение:


Для расчета количества списанных станков применим функцию СЧЕТЕСЛИ:
СЧЁТЕСЛИ(F6:F10;0).
Эта функция подсчитает количество строк с нулевым значением износа, а, значит, с нулевой современной стоимостью, то есть предназначенных для списания.
Для расчета суммарной современной стоимости оборудования по временным диапазонам воспользуемся функцией СУММЕСЛИ, которая суммирует ячейки, если они соответствуют заданному критерию. Для расчета возраста оборудования добавим еще один столбец в таблицу.
Для оборудования возрастом меньше 5 лет - СУММЕСЛИ($H$6:$H$10;"<5";$G$6:$G$10).
Построим гистограмму «Название» - «Современная стоимость».
Выберем тип диаграммы и исходные данные:



Укажем подписи к осям, выведем легенду. Результат: