Офисное программирование
Добавить в закладки К обложке
- Введение - Страница 1
- Часть IОсноные седения о программироании на VBA - Страница 2
- 1.2. Редактор VBA. Первое знакомство - Страница 7
- 1.3. Изменение порядка выполнения операторов - Страница 9
- Глава 2Объект UserForm - Страница 14
- 2.2. Использование форм - Страница 16
- Глава 3Массивы, процедуры, функции - Страница 20
- 3.2. Работа с различными типами данных - Страница 24
- 3.3. Процедуры и функции VBA - Страница 26
- Глава 4Создание VBA-программ - Страница 31
- 4.2. Элементы управления ComboBox, OptionButton и Frame - Страница 34
- 4.3. Элементы управления MultiPage, ScrollBar, SpinButton[2] - Страница 37
- 4.4. Объект DataObject[3] - Страница 41
- Часть IIПрограммирование на VBA в Word - Страница 44
- 5.2. Форматирование документа - Страница 48
- Глава 6Автоматизация стандартных документов - Страница 52
- 6.2. Создание и автоматическое заполнение бланков стандартных документов - Страница 55
- Часть IIIПрограммирование на VBA в Excel - Страница 58
- 7.2. Использование возможностей VBA при непосредственных расчетах - Страница 63
- 7.3. Финансовые функции - Страница 67
- Глава 8Построение диаграмм средстами VBA - Страница 69
- 8.2. Построение круговых диаграмм и гистограмм - Страница 72
- Глава 9Базы данных в Excel - Страница 73
- 9.2. Конструирование пользовательского интерфейса - Страница 76
- Глава 10Создание собственного головного меню[9] - Страница 78
- Литература - Страница 83
7.2. Использование возможностей VBA при непосредственных расчетах
Создание VBA-программПример 47. Дан табличный документ указанного ниже вида. Необходимо:
1) создать шаблонную часть этого документа с помощью табличного процессора Excel;
2) составить программу на языке VBA, которая будет запрашивать у пользователя исходные данные для заполнения этой таблицы, производить необходимые расчеты и помещать все данные в соответствующие ячейки, предусмотренные в шаблоне.
Отклонение фактического уровня издержек обращения от плана за месяц _________________ 20__ г.
Звездочкой (*) помечены те графы таблицы, по которым необходимо подвести итог.
Технология выполнения
Анализ таблицы показывает, что вид деятельности, прогноз прибыли и фактическая прибыль являются исходными данными, отклонение (в процентах и в сумме) – расчетными. Кроме того, рассчитываются итоги по некоторым графам таблицы.
Создание шаблона табличного документа
Шаблон создается на обычном рабочем листе в Excel. При этом необходимо только зарезервировать свободные ячейки для занесения следующих данных: месяц, год, потребительское общество, сумма издержек, товарооборот, уровень издержек. Поскольку заранее неизвестно количество потребительских обществ, то ячейки для итогов и ФИО экономиста заранее не резервируются. Рабочий лист переименован в Отчет. Реализация такого шаблона представлена на рис. 96.

Рис. 96. Шаблон-заготовка табличного документа
На этом рисунке желтым цветом обозначены те ячейки, которые во время работы программы будут заполняться исходными и расчетными данными.
Математическая модель решения задачи
Кроме организации ввода исходных данных и вывода их в некоторые ячейки электронной таблицы, программа должна производить расчет отклонений и итоговых значений по графам «Сумма издержек – план», «Сумма издержек – факт», «Товарооборот – план», «Товарооборот – факт», «Уровень издержек – план», «Уровень издержек – факт», «Отклонение по уровню». Для расчетных величин используем следующие переменные:
Nomer – номер текущей строки таблицы;
SP – планируемая сумма издержек;
SF – фактическая сумма издержек;
TP – планируемый товарооборот;
TF – фактический товарооборот;
IP – планируемый уровень издержек;
EF – фактический уровень издержек;
ItogSP – накопление итога по столбцу «планируемая сумма издержек»;
ItogSF – накопление итога по столбцу «фактическая сумма издержек»;
ItogTP – накопление итога по столбцу «планируемый товарооборот»;
ItogTF – накопление итога по столбцу «фактический товарооборот»;
ItogIP – накопление итога по столбцу «планируемый уровень издержек»;
ItogEF – накопление итога по столбцу «фактический уровень издержек».
С учетом введенных обозначений расчетные формулы будут иметь следующий вид:
1) для отклонений:
[Отклонение в %] = (F – P) / P * 100
[Отклонение в сумме] = F – P
Результаты этих вычислений можно не сохранять в отдельных переменных, так как они сразу могут быть занесены в соответствующие ячейки электронной таблицы;
2) для итогов по прогнозу и факту:
ItogP = ItogP + P
ItogF = ItogF + F
Эти формулы реализуют алгоритм получения итоговой суммы методом накопления, когда величина прогноза (факта), соответствующая очередному виду деятельности, добавляется к сумме соответствующих величин по уже рассмотренным видам деятельности. Назовем эти суммы промежуточными. Когда будут обработаны все виды деятельности, промежуточные суммы превратятся в окончательные – итоговые. В начале этого процесса (до того, как будет рассчитываться первая промежуточная сумма) переменные ItogP и ItogF равны нулю;
3) для итогов по отклонениям:
[итоговое отклонение в процентах] = (ItogF – ItogP) / ItogP * 100
[итоговое отклонение в сумме] = ItogF – ItogP
Результаты этих вычислений можно не сохранять в отдельных переменных, так как они сразу могут быть занесены в соответствующие ячейки электронной таблицы.
Разработка интерфейса пользователя