Лабораторная работа № 3. VBA. Работа с условными и безусловными операторами. Работа с циклами

Лабораторная работа № 2. Создание программ на VBA с использованием функций и процедур

Лабораторная работа № 1. Разработка алгоритмов

1. Разработайте алгоритмы для нахождения:

- суммы чисел;

- среднего значения;

- максимального значения;

- минимального значения;

2. На основе представленных данных (табл. 1) разработать алгоритм определения среднего балла каждого студента

Таблица 1

ФИО	Информатика	История экономики	Экономическая теория	Философия
Иванов И.И.
Петров И.Д.
Сидоров И.Б.
Сидорова М.Г.
Миронова П.Н.

3. Отчет оформите в виде блок-схем в MS Word.

1. Запишите макрос создания таблицы, состоящей из двух столбцов – “Наименование региона” и “Число малых предприятий” (5-6 строк), подсчитайте среднее значение и остановите запись. Назовите макрос “Создание” и назначьте сочетание клавиш для быстрого его вызова. Переименуйте лист в “Число МП”.

2. Просмотрите записанный макрос, запишите комментарии, что означают полученные команды.

3. Запишите макрос “Копирование”, копирующий созданную таблицу на другой лист, а также добавляющий дополнительный столбец “Среднесписочная численность работников малых предприятий”. Просмотрите его, запишите комментарии к командам.

4. На основе различных способов адресации ячеек (Range, Cells, ActiveCell), разработайте процедуру “Заполнение” для заполнения данными добавленного столбца. Переименуйте лист на “Работники МП”.

5. Запишите макрос “Макс_мин” для определения максимального и минимального значения среднесписочной численности работников. Просмотрите его, добавьте комментарии.

6. На новом листе “Результат” разработайте процедуру создания таблицы, состоящую из трех столбцов “Наименование предприятия”, “Прибыль” и “Убыток” (5-6 строк).

7. Добавьте в полученную таблицу столбец “Финансовый результат”. Создайте функцию пользователя “Фин_рез”, которая рассчитывала бы результат работы предприятия, как “Прибыль” минус “Убыток”.

8. Запишите макросы перехода на листы “Число МП”, “Работники МП” и “Результат”.

9. На отдельном листе с помощью панели инструментов Формы поместите три кнопки и назначьте на них макросы перехода на соответствующие листы.

10. Оформите полученное кнопочное меню, согласно Вашим эстетическим представлениям (сделайте заливку, добавьте рисунок и т.д.).

11. Сохраните созданный файл, поскольку он понадобится для выполнения следующей лабораторной работы.

1. Создайте процедуру “Налог”, которая добавляет и рассчитывает в таблице на листе “Результат” из предыдущей работы дополнительный столбец “Налог” (если “Прибыль” меньше 10000, то “Налог” равен 7%, от 10000 до 20000 – 10% и от 20000 и более – 13% от суммы прибыли).

2. На основе конструкции While Do…Loop разработайте процедуру “Макс” для нахождения максимального и “Мин” для нахождения минимального значения суммы налога.

3. Создайте процедуру “Наименование”, которая напротив ячеек с данными о максимальной и минимальной сумме налога помещала бы соответствующее наименование региона.

4. Организуйте заполнение столбца “Финансовый результат” с помощью процедуры “Заполнение_1”, используя цикл For…Next.

Дата добавления: 2014-12-08