Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
LabVBA-979.doc
Скачиваний:
8
Добавлен:
08.11.2018
Размер:
526.34 Кб
Скачать
    1. Створення макросів

      1. Планування макросу

Один із найбільш важливих етапів у створенні макросу – це планування того, що ж макрос повинен робити. Після вмикання запису макросу кожна виконана Вами дія буде записана. Якщо дії спла­новані не точно, макрос може містити багато непотрібних операцій. Ці непотрібні операції уповільнюють виконання макросів або можуть породжувати непередбачені побічні ефекти, що в остаточному підсумку призводять до хибних результатів.

Спробуємо запис макросу на дуже простому прикладі. Припустимо, необхідно створити макрос, що вставляв би якійсь текст, форматований певним чином, у будь-яке місце робочої книги. Нехай наш текст складається з такої інформації:

  • імені автора документа;

  • дати створення документа.

      1. Запис макросу

Коли всі операції, що повинні бути виконані макросом, чітко визначені, можна приступити до запису макросу. Щоб записати макрос, виконайте такі дії:

  1. Відчиніть потрібну робочу книгу й активізуйте робочий Лист, де буде записаний макрос. Активізуйте клітину, з якої повинен починатися макрос. Запис макросу нашого приклада починається з клітини С5.

  2. Виберіть команду Сервис/Макрос/Начать_запись. З'явиться діалогове вікно Запись макроса.

  3. Введіть ім'я макросу. Для нашого приклада макроса використовуйте ім'я СозданДата. Можна ввести сполучення клавіш для макросу, але це можна зробити й потім.

  4. Виберіть місце збереження для макросу. У даному випадку виберіть Эта книга зі списку Сохранить в.

  5. Клацніть на кнопці ОК, щоб почати запис макросу, Діалогове вікно закриється і з'явиться панель інструментів Остановить запись.

  6. Клацніть на кнопці Относительная ссылка панелі інструментів Остановить запись, щоб перейти до відносного методу для посилань на клітини.

  7. Виконайте ті дії, які Ви планували записати в макрос:

  1. Введіть текст Створений Біллом Реем в активну кліти­ну, а потім натисніть <Enter>.

  2. Оскільки <Enter> звичайно переміщує табличний курсор у нижню клітину, активізуйте попередню клітину за допомогою миші або клавіш керування курсором.

  3. Щоб застосувати форматування шрифту для цієї клітини, виберіть команду Формат/ Ячейки, а потім клацніть на вкладці Шрифт у діалоговому вікні, що з'явилося. Використовуйте шрифт Times New Roman, розміром 10 пунктів, курсивний напис.

  4. Виберіть вкладку Граница в діалоговому вікні Формат ячеек, щоб створити подвійну лінію унизу клітини. Клацніть на кнопці OK для завершення форматування.

  5. Переміститеся униз на одну клітину.

  6. Введіть в клітину формулу =Сегодня().

  7. Виберіть команду Формат/Ячейки та встановіть курсивний напис і розмір шрифту 10 пунктів.

  8. Виберіть вкладку Число, щоб використовувати відповідний формат дати для цієї клітини. Виберіть формат 16 Апреля, 1997.

  9. Виділите дві клітини, до яких була введена інформація. Виділення дозволить вирівняти ширину стовпчика по вмісту клітин.

  10. Виберіть команду Формат/Столбец/Автоподбор ширины. Ширина стовпчика буде автоматично вирівняна по введеному тексту.

  1. Для припинення запису клацніть на кнопці Остановить запись панелі інструментів Остановить запись або виберіть команду Сервис/Макрос/Остановить запись.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]