Новости

VBA Excel. Макроси (запис, запуск, приклад)

  1. Вкладка «Розробник»
  2. запис макросу
  3. список макросів
  4. запуск макросу
  5. Приклад запису простого макросу
  6. Призначення макросу кнопці

Створення макросів в різних версіях Excel для автоматизації повторюваних дій користувача, які можуть бути простими або складними, часто повторюваними або рідко. Для використання макросів на практиці зазвичай їх доводиться коригувати в редакторі VBA. Щоб Excel міг запускати макроси, необхідно дозволити їх виконання .

  1. Вкладка «Розробник»
  2. запис макросу
  3. список макросів
  4. запуск макросу
  5. Приклад запису простого макросу
  6. Призначення макросу кнопці

Вкладка «Розробник»

Запис макросу здійснюється вбудованим рекордером, кнопка запуску якого знаходиться на вкладці «Розробник» головного меню програми Excel. За замовчуванням ця вкладка не відображається. Додати вкладку на панель можна наступним чином:

Excel 2010-2016

Переходимо по шляху: Файл - Параметри - Налаштувати стрічку. У розділі «Налаштувати стрічку» праворуч у списку «Основні вкладки» встановлюємо прапорець «Розробник» і натискаємо кнопку «OK».

Excel 2007

Переходимо по шляху: значок «Microsoft Office» - Параметри Excel - категорія «Основні», в категорії «Основні» встановлюємо прапорець «Показувати вкладку« Розробник »на стрічці» і натискаємо кнопку «OK».

Excel 2000-2003

Тут нічого відображати не треба: кнопки по роботі з макросами і редактором VBA знаходяться в головному меню на вкладці «Сервіс» - «Макрос».

Насправді в Excel для роботи з макросами використовуються не кнопки, а пункти меню, але, для зручності, продовжу називати їх кнопками.

запис макросу

Excel 2007-2016

На стрічці у вкладці «Розробник» натисніть кнопку «Запис макросу».

Excel 2000-2003

Пройдіть по пунктам меню «Сервис» - «Макрос» - «Почати запис».

Відкриється вікно:

Відкриється вікно:

Вікно «Запис макросу»

Ім'я макросу: можна змінити або залишити за замовчуванням ( «Макрос» з черговим номером). Якщо у вас вже є макрос з таким ім'ям, він буде записаний в новий програмний модуль , Який буде створений автоматично.

Швидкий доступ: додайте букву, якщо хочете запускати макрос сполучення клавіш Ctrl + «буква». В якій розкладці ви впишіть букву (наприклад, «й» або «q»), в тій і буде запускатися макрос. Якщо буква буде вписана в верхньому регістрі ( «Й» або «Q»), використовуйте для запускa макросу сполучення клавіш Ctrl + Shift + «буква».

Зберегти в: виберіть книгу, в якій повинен бути збережений макрос:

  • «Ця книга» - макрос буде записаний в книзі, з якої рекордер був запущений (натиснута кнопка «Запис макросу»).
  • «Нова книга» - відкриється нова книга і макрос буде записаний в ній.
  • «Особиста книга макросів» - макрос запишеться в Особисту книгу макросів і буде доступний з усіх відкритих книг Excel.

Опис: тут можна додати короткий опис макросу, яке буде відображатися у вікні доступних макросів при виділенні його в списку.

Заповнивши вікно, натискаємо кнопку «OK», кнопка «Запис макросу» змінює свою назву на «Зупинити запис», і можна приступати, власне, до запису макросу. Виконайте на робочому аркуші операції, послідовність яких ви хочете автоматизувати і, після їх завершення, натисніть кнопку «Зупинити запис». Макрос буде записаний і з'явиться в списку макросів.

список макросів

Вікно із списком макросів відкривається у всіх версіях Excel натисненням кнопки «Макрос». Виглядає воно наступним чином:

Виглядає воно наступним чином:

Список макросів у всіх відкритих книгах

  • Виконати - виділений макрос буде запущений на виконання.
  • Ввійти - перехід до коду макросу, запущеного і поставленому на паузу, як при виявленні помилки в коді.
  • Змінити - перехід до коду макросу для редагування.
  • Створити - кнопка стане активною під час запису імені нового макросу в поле «Ім'я макросу».
  • Видалити - видалення виділеного макросу.
  • Параметри ... - редагування поєднання клавіш для запуску макросу і його опису.
  • Знаходиться в: - тут можна вибрати всі відкриті книги або одну з них.
  • Опис - текст, доданий в однойменне поле при створенні макросу або редагуванні його параметрів.

запуск макросу

Запустити записаний макрос за допомогою таких дій:

  • Сполучення клавіш, зазначеним в параметрах макросу.
  • Кнопкою «Виконати» з вікна списку макросів.
  • Кнопкою «Run Sub» або клавішею «F5» з редактора VBA.
  • Кнопкою, доданої на лист Excel з розділу «Елементи управління форми» і якої призначений запускається макрос.

Крім цього макрос можна призначити зображення, додати кнопку запуску на панель швидкого доступу та в меню (на стрічку).

Приклад запису простого макросу

Виконайте наступні дії:

Excel 2007-2016

  1. Відкрийте книгу Excel або створіть нову і збережіть її як книгу з підтримкою макросів (.xlsm).
  2. На вкладці «Розробник» натисніть кнопку «Запис макросу».
  3. У вікні «Запис макросу» натисніть кнопку «OK», залишивши параметри за замовчуванням.
  4. Перейдіть на вкладку «Головна» і виберіть будь-який колір заливки осередків.
  5. Натисніть кнопку «Зупинити запис».

Excel 2000-2003

  1. Відкрийте книгу Excel або створіть нову і збережіть її з розширенням за замовчуванням (.xls).
  2. Увімкніть запис макросу, пройшовши по пунктам меню «Сервис» - «Макрос» - «Почати запис».
  3. У вікні «Запис макросу» натисніть кнопку «OK», залишивши параметри за замовчуванням.
  4. На панелі інструментів виберіть будь-який колір заливки осередків.
  5. Натисніть кнопку «Зупинити запис».

В результаті буде записаний найпростіший макрос фарбування фону виділеного осередку або діапазону.

Відкрийте список макросів, виберіть записаний макрос і натисніть кнопку «Змінити». Ви побачите код вашого макросу:

Sub Макрос1 () '' Макрос1 Макрос '' With Selection.Interior .Pattern = xlSolid .PatternColorIndex = xlAutomatic .Color = 5296274 .TintAndShade = 0 .PatternTintAndShade = 0 End With End Sub

Число (5296274) в вашому прикладі буде іншим, в залежності від обраного кольори заливки .

Виберіть на активному аркуші будь-яку клітинку або діапазон, поверніться в редактор VBA і натисніть клавішу «F5» (курсор повинен знаходитися в будь-якому місці всередині коду запускається макросу). На активному аркуші виділений діапазон забарвиться в обраний під час запису макросу колір.

Рекордер макросів може записувати багато зайвих рядків, без яких можна обійтися. Точно також макрос буде працювати і в такій редакції:

Sub Макрос2 () Selection.Interior.Color = 5296274 End Sub

Розмістіть цей код і вставте його внизу, під вашим макросом, в редакторі VBA (числове значення кольору можете змінити на своє або залишити, як в прикладі). Перевірте його працездатність, вибравши незафарбовані осередки і запустивши макрос клавішею «F5», не забувши про те, що курсор повинен знаходитися всередині цього макросу.

Імена макросів повинні відрізнятися в межах одного модуля , Але ще краще - всім макросам однієї книги давати унікальні імена.

Призначення макросу кнопці

Тепер давайте призначимо записаний макрос (будь-який з двох) кнопці, доданої на лист Excel з розділу «Елементи управління форми»:

Excel 2007-2016

  1. На вкладці «Розробник» натисніть кнопку «Вставити» і в розділі «Елементи управління форми» клікніть по зображенню кнопки.
  2. Переведіть курсор на табличну область листа, курсор набуде вигляду хрестика, і клацніть лівою кнопкою миші.
  3. У вікні «Призначити макрос об'єкту» виберіть один з нових макросів і натисніть кнопку «OK». Якщо натиснути кнопку «Скасування», нова кнопка буде створена без призначеного макросу. Його можна буде призначити пізніше, клікнувши по ній правою кнопкою миші і вибравши в контекстному меню «Призначити макрос ...»

Excel 2000-2003

    1. Перейдіть панель інструментів «Форми», пройшовши по пунктам меню «Вид» - «Панелі інструментів» - «Форми».
    2. Клацніть по кнопці на панелі інструментів «Форми», потім переведіть курсор на табличну частину робочого листа, натисніть ліву кнопку миші і, не відпускаючи її, намалюйте прямокутник (контур кнопки) потрібного розміру, потім відпустіть кнопку миші.
    3. У вікні «Призначити макрос об'єкту» виберіть один з нових макросів і натисніть кнопку «OK». Якщо натиснути кнопку «Скасування», нова кнопка буде створена без призначеного макросу. Його можна буде призначити пізніше, клікнувши по ній правою кнопкою миші і вибравши в контекстному меню «Призначити макрос ...»

Кнопка створена. Виберіть клітинку або діапазон і натисніть створену кнопку. Колір фону зміниться.

Ви можете записати ще один такий же макрос, тільки вибрати на палітрі «Ні заливки», створити ще одну кнопку і призначити їй новостворений макрос. Тепер, перша кнопка буде фарбувати виділений діапазон, а друга очищати його від заливки.

Скорочений варіант коду по очищенню фону буде виглядати так:

Sub Макрос3 () Selection.Interior.Pattern = xlNone End Sub

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

Уважаемые партнеры, если Вас заинтересовала наша продукция, мы готовы с Вами сотрудничать. Вам необходимо заполнить эту форму и отправить нам. Наши менеджеры в оперативном режиме обработают Вашу заявку, свяжутся с Вами и ответят на все интересующее Вас вопросы.

Или позвоните нам по телефонам: (048) 823-25-64

Организация (обязательно) *

Адрес доставки

Объем

Как с вами связаться:

Имя

Телефон (обязательно) *

Мобильный телефон

Ваш E-Mail

Дополнительная информация: