Тема 5. Программирование расчетов по переоценке основных средств

Используя VBA, необходимо автоматизировать процесс заполнения накопительной ведомости по переоценке основных средств производства (в млн.руб.). Для хранения исходных данных использовать таблицы СУБД MS Access. В качестве интерфейса использовать формы MS Excel и (или) загрузку данных из рабочего листа MS Excel. Результаты выгрузить в рабочий лист MS Excel.

N п/п	Наименование объекта	Балансовая стоимость	Износ	Остаточная стоимость	Восстановительная полная стоимость	Восстановительная остаточная стоимость
1	2	3	4	5	6	7
1	Заводоуправление	13457	589,3
2	Диспетчерская	187,4	51,4
3	Цех 1	932,6	226,1
4	Цех 2	871,3	213,8
5	Цех 3	768,8	134,9
6	Склад 1	576,5	219,6
7	Склад 2	344,6	98,4
8	Склад 3	567,4	123,5
9	Склад 4	312,6	76,8
	Итого:

Примечание 1. Гр.6=гр.3*к гр.7=гр.5*к, где к=3,0, если балансовая стоимость больше 500млн. руб., иначе к=2,0.

1. Выдать список наименований объектов, балансовая стоимость которых находится в пределах от 400 до 800 млн. руб.

2. Подсчитать суммы восстановительной полной и остаточной стоимостей, износ объектов которых составит не больше 100 млн. руб.

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

Тема 6. Программирование расчета стоимости продукции с учетом скидки

Используя VBA, решить задачу автоматизации расчета стоимости продукции с учетом скидки. Для хранения исходных данных использовать таблицы СУБД MS Access. Интерфейс можно реализовать в виде формы MS Excel и (или) загрузки данных из рабочего листа MS Excel. Результаты округлять до двух знаков после запятой и выгрузить в рабочий лист MS Excel.

Номенкл. номер	Наименование продукции	Количество (шт.)	Цена (тыс. руб.)	Стоимость (тыс. руб.)	% скидки	Сумма скидки (тыс. руб.)	Стоимость с учетом скидки (тыс. руб.)
1	2	3	4	5	6	7	8
202	Монитор	5	12		7
201	Клавиатура	25	0,25		5
213	Диск	100	0,02		10
335	Принтер	2	5,8		20
204	Сканер	1	6,2		15
	Итого:

1. Выдать список наименований продукции с номенклатурными номерами, стоимость с учетом скидки которых находится в пределах от 5 до 10 тыс. руб.

2. Подсчитать: – сумму скидки для продукции с ценой больше 5 тыс. руб., – количество наименований продукции, % скидки которых превышает 10 %.

3. Построить гистограмму изменения стоимостей по продукциям (данные граф 5, 8 и 2).