Задача 1. Записать макрос

Запишем макрос, который создает новую рабочую книгу, состоящую из единственного рабочего листа Отчет с шаблоном отчетной таблицы, в которую остается только внести числовые данные.

1. Добавить вкладку Разработчик на ленту команд: Меню MS Office/Параметры Excel/Показывать вкладку Разработчик на ленте команд – поставить флажок. Для активизации макрорекордера выбрать команду Разработчик/Запись макроса. Появится диалоговое окно Запись макроса, которое позволит задать параметры макроса.

2. Задать имя макроса: СоздатьОтчет. Сохранить в – Эта книга Задать описание: Создание рабочей книги с отчетной таблицей. Нажмите ОК. Теперь все производимые действия будут записываться до тех пор, пока не будет выбрана команда Разработчик/Остановить запись.

3. Последовательность действий, которую запишет макрорекордер:

a. Меню MS Office/Параметры Excel/Основные/раздел «При создании новых книг»: Число листов – 1/ОК.

b. Меню MS Office/Создать/Новая книга/кнопка Создать.

c. Переименовать ярлык Лист 1 в Отчет.

d. Выделить ячейку А2 и ввести в нее Отдел закупок.

e. Выделить ячейку А3 и ввести в нее Отдел рекламы.

f. Выделить ячейку А4 и ввести в нее Итого.

g. Двойным щелчком по границе столбцов А и В подберите ширину столбца А.

h. Выделить ячейку В1 и ввести в нее Расходы.

i. В ячейку В4 ввести формулу: =СУММ(В2:В3).

j. Выделить диапазон А1:В4, на вкладке Главная в разделе Стиль ячеек выбрать любые стили (можно поочередно применить несколько, например «Хороший» и «Примечание»). Когда таблица примет нужный вид – остановите запись макроса: Разработчик/Остановить запись.

4. Для выполнения только что записанной процедуры выберите команду Разработчик/Макросы, отобразится диалоговое окно Макросы. В нем выберите имя нашего макроса и нажмите кнопку Выполнить. Если нажать кнопку Изменить, то на экране отобразится окно редактора VBA с активизированным стандартным модулем, в котором будет код только что записанного макроса. Ничего менять не будем, закрываем окно модуля.

Если все выполнено верно, то после выполнения команды Выполнить будет создана еще одна рабочая книга с одним листом, названным «Отчет», на котором буде размещена заданная таблица. Введите данные в столбец В (например В2 - 1000 и В3 - 1200). Сумма будет подсчитана автоматически.

Макрос можно назначить кнопке, созданной с помощью панели инструментов «Элементы управления формы». Для этого выполним последовательность действий:

1. Разработчик/Вставить/ Элементы управления формы.

2. Выбрать левой кнопкой мыши инструмент «Кнопка» (указатель мыши принимает вид тонкого креста). Очертить мышкой, нажимая ее левую кнопку, контур будущей кнопки.

3. В окне Назначить макрос объекту выбрать имя нашего макроса и нажать ОК.

4. Поместите указатель мыши в центр кнопки и дважды щелкните левой кнопкой.

5. Сотрите имя «Кнопка 1» и введите имя кнопки «СоздатьОтчет», аналогичное имени макроса.

6. Проверьте работу макроса нажатием на созданную кнопку.