Копіювання макросів

Макроси можна копіювати з однієї БД в іншу або в одну і ту ж БД але під різними іменами. Це економить час при створенні макросів, що виконують схожі задачі.

Існуючий макрос можна скопіювати, виконавши наступні дії:

• У вікні БД вибрати потрібний макрос.

• Вибрати команду Правка  Копировать.

• Для копіювання макросу до іншої БД закрити поточну і відкрити ту, в яку копіюватиметься макрос. Вибрати у вікні БД вкладку Макросы.

• Вибрати команду Правка  Вставить.

• У діалоговому вікні, що з'явилося, ввести ім'я макросу. Якщо макрос копіюється до тієї ж БД, в якій знаходиться існуючий макрос, то копійованому макросу необхідно привласнити інше ім'я.

Робоче завдання

Завдання 1

Створити макрос, який виводитиме на екран запрошення до роботи Ласкаво просимо до роботи з базою даних "Відділ кадрів", якщо користувач буде виконувати запуск бази даних Відділ кадрів.

Відкрити базу даних Відділ кадрів. У вікні бази даних вибрати режим роботи Макросы і натиснути кнопку Создать. Відкриється вікно створення нового макросу подібне тому, що показане на рис. 6.1. Для того, щоб у вікні відображалися усі поля, необхідно клацнути кнопки Имена макросов і Условия на панелі інструментів, або виконати однойменні команди в пункті Вид. Вікно створення макросу матиме вигляд як на рис. 6.2. В полі Имя макроса ввести ім’я макросу Запрошення. Клацнути по полю Макрокоманда та розкрити список макрокоманд, з якого вибрати макрокоманду Сообщение.

Заповнити розділ Аргументы Макрокоманды такими даними: в поле Сообщение ввести текст Ласкаво просимо до роботи з базою даних "Відділ кадрів" Щоб почати роботу натисніть ОК ; для поля Сигнал вибрати із списку Да; для поля Тип вибрати Информационное; в поле Заголовок ввести текст Початок роботи з базою даних "Відділ кадрів". Зберегти створений макрос під ім’ям Запрошення. Перевірити роботу макросу, виконавши команду Запуск через пункт меню Запуск, або використавши кнопку (запуск).

Рисунок 6.2 – Діалогове вікно створення нового макросу з усіма полями

Щоб створене повідомлення з’являлося автоматично при запуску бази даних Відділ кадрів, перейменувати створений макрос Запрошення, надавши йому ім’я Autoexec. Для цього закрити створений макрос, клацнути правою кнопкою миші по значку макросу Запрошення і за допомогою команди Переименовать ввести нове ім’я Autoexec. Закрити базу даних Відділ кадрів, потім запустити її знову. Тепер з’явиться діалогове вікно запрошення до роботи.

Завдання 2

Створити макрос, за допомогою якого в базі даних Відділ кадрів можна вибрати робітників, які займають посаду водія.

Відкрити базу даних Відділ кадрів. У вікні бази даних вибрати режим роботи Макросы і натиснути кнопку Создать. Відкриється вікно створення нового макросу. Вибрати послідовно такі макрокоманди:

1. Макрокоманда ВыделитьОбъект з аргументами Тип объекта – Таблица, Имя объекта – Співробітник.

2. Макрокоманда ОткрытьТаблицу з аргументами Имя Таблицы – СПІВРОБІТНИК, Режим – Таблица, Режим данных – Только чтение.

3. Макрокоманда ПрименитьФильтр з аргументами Имя фильтра – Водій, Условие отбора: [СПІВРОБІТНИК]![Посада]="Водій". Зберегти макрос з ім’ям Посада. Перевірити його роботу. При закритті таблиці з даними про співробітників, які обіймають посаду водій таблицю не зберігати.

Завдання 3

Змінити макрос завдання 2 так, щоб з таблиці СПІВРОБІТНИК були відібрані неодружені водії.

Для цього необхідно відкрити макрос Посада в режимі Конструктор і змінити умову відбору у макрокоманді ПрименитьФильтр таким чином: [СПІВРОБІТНИК]![Посада] = "Водій" And [СПІВРОБІТНИК]![Сім стан] = "неодружений". Зберегти макрос з ім’ям Посада_Сім_стан. Перевірити виконання макросу, проаналізувати результат.

Завдання 4

Створити макрос, за допомогою якого в базі даних Відділ кадрів можна вибрати робітників, які мають вишу освіту і результати відбору вивести у складну форму. Для створення макросу використати метод перетягування.

1. У вікні бази даних в режимі роботи Макросы натиснути кнопку Создать. Відкриється вікно створення нового макросу.

2. Перемістити вікно макросу і змінити його розміри так, щоб одночасно було видно вікна макросу і бази даних.

3. У вікні БД вибрати об'єкт, який відкриватиметься макросом. У нашому випадку це форма Співроб_складна.

4. Натиснути ліву кнопку миші і перемістити значок форми Співроб_складна в порожній рядок стовпця Макрокоманда вікна макросів. Після цього в стовпці Макрокоманда з'явиться команда ОткрытьФорму. В ній перевірити значення аргументів Имя формы – Співроб_складна, Режим – Форма, Режим окна – Обычное, інші аргументи не заповнені.

5. В наступному полі стовпця Макрокоманда вибрати макрокоманду ПрименитьФильтр. Для неї встановити такі значення аргументу Условие отбора: [СПІВРОБІТНИК]![Освіта]="вища".

6. Зберегти макрос з ім’ям Вища освіта, перевірити його роботу. Проаналізувати результат виконання.

Завдання 5

Створити командну кнопку на панелі інструментів для запуску макросу Посада

У вікні бази даних Відділ кадрів в режимі роботи Макросы навести покажчик на значок макросу Посада і перетягнути його на панель інструментів. На панелі інструментів з’явиться кнопка Посада. Якщо на неї навести покажчик миші, з’являється спливаюче повідомлення Запуск макроса 'Посада'. Перевірити роботу кнопки.

Вилучити кнопку Посада. Для цього клацнути правою кнопкою миші по панелі інструментів і в контекстному меню виконати команду Настройка. Відкриється діалогове вікно Настройка. Перетягнути кнопку Посада у вікно Настройка. Кнопка буде видалена з панелі інструментів.

Завдання 6

Створити кнопку на формі Співробітник, яка буде за допомогою макросу запускати файл для створення заміток по роботі з формою в редакторі Microsoft Word.

У вікні бази даних вибрати режим роботи Макросы і натиснути кнопку Создать. Відкриється вікно створення нового макросу. Клацнути по полю Макрокоманда та розкрити список макрокоманд, з якого вибрати макрокоманду ЗапускПриложения. В поле аргументу Командная строка ввести ім’я додатка WinWord. Закрити макрос зі збереженням, присвоївши йому ім’я Замітки.

У вікні БД перейти в режим форми, відкрити форму Співробітник в режимі Конструктор, додати на форму область заголовка за допомогою команди меню Вид та перетягнути значок макросу Замітки в область заголовка форми. Перейти в режим форми, клацнути мишею по кнопці Замітки. Відкриється вікно текстового редактора Word. Ввести дату виконання дій для чого виконати команду Вставка  Дата и время …, для дати вибрати формат день місяць рік. З нового рядка набрати текст відповіді на питання: як створити кнопку виклику додатку WinWord?. Зберегти файл в папці з номером групи під ім’ям Замітки, закрити текстовий редактор.

На формі Співробітник клацнути мишею по кнопці Замітки, відкриється вікно текстового редактора. Відкрити файл Замітки за допомогою команди Файл  Открыть. Ввести наступний текст:

Зміна вигляду кнопки Замітки.

Навести покажчик миші на кнопку Замітки у вікні форми Співробітник, визвати контекстне меню, в ньому вибрати команду Свойства. Відкриється вікно властивостей кнопки. В цьому вікні на вкладці макет знайти властивість Рисунок та розкрити її за допомогою кнопки з …. Відкриється вікно Рисунки з набором стандартних значків. З поля списку Имеющиеся рисунки вибрати MS Word і клацнути ОК. Закрити вікно властивості Кнопки.

Створити для кнопки спливаючу підказку з таким змістом: "Запуск MS Word для нотаток". Для цього у вікні властивостей кнопки перейти на вкладку Другие і набрати вказаний текст ліворуч від властивості Всплывающая подсказка. Закрити вікно властивостей кнопки.

Закрити вікно редактора Word із збереженням змін.

У вікні форми Співробітник, відкритою в режимі Конструктор, виконати дії по зміні вигляду кнопки Замітки, описані в редакторі Word. Перевірити виконані зміни та проаналізувати результати.