1. В окне базы данных в списке объектов выберите Макросы и щелкните по кнопке Создать. Для отмены вывода промежуточных сообщений в первой строке макроса выберите макрокоманду УстановитьСообщения, сохраните аргумент - Нет, и введите комментарий: Отмена вывода промежуточных сообщений
2. Введите вторую макрокоманду - КопироватьОбъект, определите аргументы: Новое имя - Общая ведомость, Тип объекта - Таблица, Имя объекта - Ведомость 851_1. Введите комментарий: Копирование Ведомости 851_1 в Общую ведомость.
3. Введите следующую макрокоманду - КопироватьОбъект, определите аргументы: Новое имя - Ведомость 1, Тип объекта - Таблица, Имя объекта - Ведомость 851_2. Введите комментарий: Копирование Ведомости 851_2 в Ведомость 1.
4. Введите в четвертую строку макрокоманду ОткрытьЗапрос. Определите аргументы: Имя запроса - Запрос на добавление записей в Общую ведомость, Режим - Таблица, Режим данных - Изменение. Введите комментарий: Добавление записей из таблицы Ведомость 1 в Общую ведомость.
5. Выделите 3-ю и 4-ую строки макроса и скопируйте их в буфер. Щелкните мышкой в первом столбце 5-ой строки, вызовите правой кнопкой мыши контекстное меню и вставьте из буфера строки. Отредактируйте аргумент Имя объекта для 6-ой макрокоманды. Вместо имени Ведомость 851_2 введите имя Ведомость 852_1. Отредактируйте соответственно комментарий.
6. Используя вставку из буфера, введите остальные макрокоманды макроса - по две макрокоманды (КопироватьОбъект и ОткрытьЗапрос) для каждой ведомости. Отредактируйте аргумент Имя объекта для макрокоманд КопироватьОбъект.
7. Сохраните макрос, присвоив ему имя: Макрос формирования общей ведомости. Проведите отладку макроса, запуская его по шагам. После устранения ошибок отключите пошаговый режим запуска и закройте макрос. На рис. 7.2. приведен окончательный текст макроса.
Рис. 7.2. Макрос формирования Общей ведомости.
8. Запустите макрос из окна базы данных. Просмотрите таблицу Общая ведомость. Убедитесь в правильности работы макроса. Вы можете неоднократно запускать этот макрос, при этом содержание таблицы Общая ведомость останется неизменным.