Создание простого макроса , позволяющего выбирать из списка клиента для последующего создания отчета
Периодически требуется просматривать данные о заказах различных фирм. Можно создать отчет на основе параметрического запроса и вводить с клавиатуры название фирмы. А можно создать специальную форму, позволяющую выбирать из списка название фирмы и просматривать в отчете данные о заказах этой фирмы
Создайте отчет Клиенты с группировкой по фирме
Создайте новую форму ВЫБОР ФИРМЫ при помощи Конструктора, без использования источника данных
Создайте поле со списком , позволяющее выбирать название фирмы.(кнопку мастера не отключайте)
Измените имя поля со списком
Выделите поле со списком
Откройте окно Свойств
Вкладка -- Другие
Введите имя - Фирма
Создайте макрос ВЫБОР
Щелчок правой клавишей по полю Фирма
Откройте окно Свойств
Вкладка События
Строка Изменение
кнопка … - Макросы
Выберите из списка макрокоманду Открыть Отчет
Введите аргументы макрокоманды
Выберите имя отчета Клиенты
Укажите режим Просмотр
Условие отбора лучше создать при помощи построителя выражений
[КодКлиента]=[Forms]![Выбор Фирмы]![Фирма]
Выберите из списка макрокоманду Закрыть
Сохраните изменения
Откройте форму ВЫБОР ФИРМЫ и проверьте действие макроса ВЫБОР
Пример создания макроса архивации старых данных.
С течением времени в таблице Заказы скапливаются старые записи о заказах, которые не требуются для текущей работы. Периодически убирая старые и редко использующиеся данные в таблицу Старые Заказы увеличивается быстродействие основных частей БД.
Скопируйте таблицу Заказы с сохранением структуры (но не данных) в таблицу Старые Заказы
Откройте таблицу Старые Заказы в режиме Конструктора и добавить поле Стоимость (денежное поле)
Создайте запрос Добавление В Архив , используя таблицы Заказы, Компьютеры, Принтеры.
При создании запроса используйте все поля из таблицы Заказы
Создайте вычисляемое поле Стоимость
Условие отбора записей укажите для поля Даты Заказа (например <Date( ) -30. )
Преобразуйте в запрос на добавление (меню ЗАПРОС )
Проверьте выполнение запроса в режиме таблицы (Вид – Таблица), но не выполняйте запрос
После копирования устаревших данных их необходимо удалить из таблицы Заказы. Для этого необходимо создать запрос Удаление В Архив.
Пример Запроса на Удаление
Условие отбора должно совпадать с условием отбора для запроса Добавление В Архив.
Создайте макрос Архивация
Перейдите на вкладку Макросы и нажмитеь кнопку Создать и создайте следующий макрос
|
Макрокоманда |
Аргументы макрокоманды |
Примечание |
|
Установить Сообщение |
Выключить сообщение: нет |
Выключение системных сообщений |
|
Открыть Запрос |
имя: Добавление в Архив режим:Таблица режим данных:Изменение |
Выполнение запроса Добавление в Архив |
|
Открыть Запрос |
имя:Удаление в Архив режим:Таблица режим данных:Изменение |
Выполнение запроса Удаление в Архив |
|
Сообщение |
Сообщение: Архивация старых заказов выполнена Сигнал:да Тип: Отсутствует Заголовок:Архивация |
Создание сообщения о выполнение |
Создайте на кнопочной форме кнопку, позволяющую выполнять архивацию старых заказов.