План
1.Вступ.
2.Начало шляху.
3.Редактірованіе, видалення, перейменування і призначення макросів.
4.Прімери макросів.
5.Заключеніе.
1. Введення.
Якщо при роботі з Microsoft Excel для Windows у вас виникла необхідність кілька разів виконати одну й ту ж послідовність дій, то ви можете записати цю послідовність під певним ім'ям. Записана під певним ім'ям послідовність дій називається макросом. Записаний макрос можна викликати для виконання з основного меню за допомогою кнопки на панелі інструментів або на робочій області, а також комбінації клавіш. Макрос може бути призначений так само графічному об'єкту.
Макрос записується на мові Visual Basic for Applications. Текст макросу можна викликати для редагування.
У наступному розділі ми розглянемо питання:
Створення та редагування макросів
Призначення макросу клавіші швидкого виклику та пункту основного меню
Призначення макросу графічному об'єкту та кнопці користувача
Запис нових дій в існуючий макрос
Створення кнопки для виклику макросу
2. Початок шляху.
Створення макросів
До часто повторюваних дій можна віднести вибір потрібного формату. Процедуру створення макросів ми розглянемо на прикладі макросу "Кількість", який буде встановлювати для виділеної області числовий формат. Необхідний числовий формат створимо заздалегідь в категорії форматів Всі формати.
Для запису макросу виконайте наступні дії:
Виконайте команду Сервіс | Запис макросу | Почати запис. З'явиться вікно діалогу "Запис макросу".
Введіть у поле введення Ім'я макросу назва створюваного макросу - Число. Крім стандартної інформації (коли і ким був записаний макрос) ви можете ввести в поле введення Опис короткий опис призначення макросу. Після цього натисніть кнопку OK. Починаючи з цього моменту здійснюється запис макросу. На екрані з'являється кнопка Зупинити макрос. Якщо ви натиснете на ній кнопку миші, то запис макросу буде закінчена. Іншою ознакою режиму запису макросу є поява слова "Запис" в рядку стану.
Тепер вам потрібно виконати послідовність дій, яка і буде записана в макрос. У нашому випадку послідовність дій така: виділіть клітинки, які ви збираєтеся форматувати, та натисніть Ctrl 1; у вікні діалогу "Формат ячеек" виберіть вкладку "Кількість", а на ній категорію форматів Всі формати. З списку, що з'явився форматів кодів виберіть потрібний код, після чого натисніть кнопку OK.
На закінчення вам залишається завершити запис макросу. Крім натискання на кнопку Зупинити макрос ви можете скористатися альтернативним способом: у списку опцій пункту основного меню Сервіс виберіть Запис макросу, а потім - Зупинити запис.
Якщо кнопка Зупинити макрос відсутній з екрану, то її легко можна відновити. Для цього натисніть правою кнопкою мишки на будь-якій панелі інструментів і в списку, що з'явиться, виберіть пункт Настройка. З'явиться список категорій кнопок. Виберіть серед них категорію Макрос. З'явиться набір кнопок, який містить кнопку Зупинити макрос. Натисніть на ній кнопку миші і, утримуючи її натиснутою, перемістіть кнопку на потрібну вам панель або просто на екран. Для виходу з режиму настроювання панелей натисніть кнопку Закрити.
Після закінчення запису макросу він з'являється у списку макросів під ім'ям "Число". Для виклику макросу виконайте команду Сервіс | Макрос. З'явиться вікно діалогу зі списком макросів. Знайдіть потрібний макрос та натисніть кнопку Виконати. Результатом роботи макросу "Число" буде введення форматного коду в виділені елементи таблиці.
В Excel передбачена можливість викликати макрос за допомогою клавіші швидкого виклику або призначити макросу пункт меню у списку опцій меню Сервіс. Обидві ці можливості можна реалізувати одночасно. Для цього при виконанні 3 кроки процедури створення макросу, після введення імені, потрібно натиснути кнопку Параметри. З'явиться вікно діалогу.
Призначити макросу пункт меню або клавішу швидкого виклику можна і після того як макрос створено. Для цього виконайте команду Сервіс | Макрос. З'явиться вікно діалогу зі списком макросів. Виділіть потрібний і натисніть кнопку Параметри. З'явиться вікно діалогу, в якому ви можете зробити всі необхідні призначення.
Під час запису макросу можна включати режим з відносними посиланнями. Цей режим дозволяє використовувати записаний макрос для будь-якої області робочої книги. Режим з відносними посиланнями потрібно включати при записі макросів, які використовують посилання на адреси робочої книги.
Розглянемо два приклади макросів. Один записаний в звичайному режимі, а другий-з відносними посиланнями, після чого порівняємо їх роботу.
Приклад 1. Виведення на екран назв місяців
Під час складання різних звітів і зведень як назви рядків часто використовуються назви місяців. Створимо макрос, який буде виводити на екран стовпець з назвами місяців в осередках A1: A12. Для цього виконайте такі дії:
· Встановіть курсор в яку-небудь клітинку книги, за винятком A1.
· Виконайте команду Сервіс | Запис макросу | Почати запис. З'являється вікно діалогу "Запис макросу".
· Введіть у поле введення Ім'я макросу назва створюваного макросу Месяц_абс. У полі введення Опис введіть текст: Запроваджує назви місяців. Натисніть кнопку Параметри. З'явиться вікно діалогу "Запис макросу".
· Введіть клавішу швидкого виклику макросу. Для цього перейдіть в полі введення Ctrl, перейдіть на латинський регістр, видаліть що знаходиться там букву і введіть літеру m. Після цього натисніть кнопку OK. Починаючи з цього моменту, здійснюється запис макросу.
· Виконайте послідовність дій, яку буде виконувати макрос: встановіть курсор в комірку A1; введіть слово січень; помістіть вказівник миші в правий нижній кут комірки A1, при цьому вказівник змінить вигляд на чорний хрестик; натисніть кнопку миші і, утримуючи її натиснутою, продовжите виділення до клітинки A12.
· Натисніть на кнопку Зупинити макрос.
Якщо ви не виконаєте умову 1 кроку, тобто курсор буде знаходитися в комірці A1, то макрос буде правильно працювати тільки в тому випадку, коли ви перед натисканням клавіш Ctrl + m помістіть курсор в комірку A1.
Макрос записаний і тепер натискання клавіш Ctrl + m викличе появу в осередках A1: A12 назв місяців. Під час запису макросу ми не включали режим записи з відносними посиланнями, тому назви місяців будуть з'являтися тільки в осередках A1: A12. Для усунення цього незручності призначений режим записи з відносними посиланнями.
Приклад 2. Створення макросу з відносними посиланнями
У цьому прикладі вам належить створити макрос з відносними посиланнями для розміщення заголовка таблиці продажів комп'ютерів в довільному місці робочої книги.
Перед створенням макросу увімкніть режим записи з відносними посиланнями. Для цього виконайте такі дії:
· Виконайте команду Сервіс | Запис макросу | З відносними посиланнями.
· Введіть у поле введення Ім'я макросу назва створюваного макросу - Заголовок. У полі введення Опис введіть текст: Запроваджує назви комп'ютерів.
· Натисніть кнопку Параметри. З'явиться вікно діалогу "Запис макросу".
· Введіть найменування додається пункту меню: Типи ЕОМ. Натисніть кнопку OK.
· Виконайте послідовність дій, яку буде виконувати макрос: введіть заголовок таблиці: Тип комп'ютера; натисніть клавішу Enter; введіть тип 1 комп'ютера CP_35_SR і натисніть клавішу Tab. Аналогічно введіть такі типи комп'ютерів CP_40_SR, CP_55_LS, CP_55_SX. Виділіть чотири осередки з введеними типами комп'ютерів, виберіть команду Формат | Стовпець, а потім команду підгін ширини (оскільки назви типів комп'ютерів не вміщаються повністю в комірці).
· Натисніть на кнопку Зупинити макрос.
Після закінчення запису макросу в меню команди Сервіс з'явиться пункт з назвою Типи ЕОМ, що ми ввели на 4 кроці.
Для виконання макросу "Заголовок" потрібно натиснути кнопку миші на пункті з назвою Типи ЕОМ. У тому місці таблиці, де розташований курсор, з'явиться заголовок наступного виду: Тип комп'ютера CP_35_SR CP_40_SR CP_55_LS CP_55_SX
Цей макрос відрізняється від макросу, створеного в прикладі № 1 тим, що заголовок таблиці можна помістити в будь-якому місці поточної робочої книги.
Редагування макросів
У цьому розділі ми розглянемо питання зміни тексту макросу, його видалення і перейменування. Тут же буде розказано про те, як записати нову послідовність дій у вже існуючий макрос.
Одним із способів внесення змін до записаний макрос є запис нового макросу. Однак це не завжди зручно, а часто буває і утомливо з-за великого обсягу роботи. У наступному прикладі ми змінимо формат вводяться чисел у макросі "Число".
Приклад 3. Редагування тексту макросу
У цьому прикладі вам належить змінити текст макросу.
Для входу в режим редагування макросу виконайте команду Сервіс | Макрос. З'являється вікно діалогу "Макрос", в якому після вибору потрібного для редагування макросу стають доступними кнопки, у тому числі кнопка Редагування.
Редагувати можна і безпосередньо в модулі з текстом макросу. Текст макросу "Число" розташований у модулі 1, розташованому після 16 листа робочої книги. Використовуючи кнопки прокручування аркушів знайдіть модуль 1 і натисніть кнопку миші на його ярлику. Перед вами з'явиться текст макросу "Кількість", записаний на мові Visual Basic:
Число Макрос Форматний код "# #??" Швидкий виклик: Ctrl + x
Sub Число ()
Selection.NumberFormat = "# #??"< br />
End Sub
Перші два рядки складають коментар, наступні - текст макросу. Редагування зводиться до того, що замість форматного коду "# #??" Вводиться форматний код "# #??, 00".
Діючи аналогічним чином, ви можете внести більш серйозні зміни в текст макросу. Фактично ви маєте можливість змінювати текст програми Visual Basic, який реалізує макрос. Це відкриває перед вами великі можливості в написанні власних програм.
Видалення макросів
Якщо макрос функцію швидкого доступу, графічному об'єкту або кнопці, їх видалення є стандартним. Ви обираєте опцію Макрос пункту Сервіс основного меню. З'являється вікно діалогу "Макрос", що містить список макросів поточної робочої книги. Після вибору макросу, який ви припускаєте видалити, стануть доступними кнопки вікна діалогу "Макрос", у тому числі кнопка Видалити. Для видалення обраного макросу вам достатньо натиснути цю кнопку.
Макрос можна видалити і іншим способом. Якщо макрос записаний в окремому модулі, то потрібно видалити модуль. Для цього потрібно зробити його активним, а потім натиснути правою кнопкою мишки на його ярлику. З'явиться вікно діалогу, в якому потрібно вибрати команду Видалити. Якщо модуль містить і інші макроси, то потрібно виділити весь текст видаляється макросу і натиснути клавішу Del на клавіатурі.
Об'єкти, яким був призначений макрос, видаляються з режимів редагування цих об'єктів.
Певні труднощі представляє процес видалення рядків з назвами макросів з пункту Сервіс основного меню. Для їх видалення ви можете використовувати вікно діалогу "Редактор меню", яке відкривається натисканням кнопки Редактор меню, розташованої на панелі інструментів "Visual Basic". Ви можете вибрати що потребується пункт меню зі списку Меню. При цьому в наступному списку Елементи меню з'являються опції цього пункту меню. Ви можете вибрати і видалити потрібний рядок натисканням кнопки Видалити.
Кнопка Скидання вікна діалогу відновлює стандартне стан всіх пунктів основного меню Excel.
Після натискання кнопки Скидання відновити раніше зроблені у пункти меню призначення за допомогою клавіш Ctrl + Z неможливо. Можна тільки закрити файл без збереження всіх зроблених змін, а потім відкрити його знову.
Вікно діалогу "Редактор меню" можна викликати і без використання кнопки Редактор меню. Для цього потрібно виконати наступні дії:
· Зробіть активним якийсь модуль. Якщо в робочій книзі немає ні одного макросу, то створіть якийсь макрос (наприклад, не виконує жодних дій).
· Виберіть пункт Сервіс поточного меню. З'явиться спадаюче меню, в якому присутні додаткові опції, однією з яких є Редактор меню
· Встановіть курсор на команду Редактор меню та натисніть клавішу Enter. З'явиться потрібне вікно діалогу.
Не створюйте макрос, який відновлює пункти меню. Робіть цю роботу вручну і ви уникнете неприємностей, пов'язаних із втратою інформації.
Перейменування макросу
Спеціальної команди для перейменування макросу немає, а часто виникає потреба виправити ім'я або присвоїти макросу абсолютно нове найменування. Для цього потрібно увійти в режим редагування макросу і в тексті програми виправити заголовок.
Приклад 4. Зміна імені макросу
Змінимо ім'я макросу "Місяці" на "Месяци_с_абсолютнимі_адресамі". Для цього увійдіть до режиму редагування макросу "Місяці". Нижче розташований текст програми.
Місяці Макрос Швидкий виклик: Ctrl + o
Sub Місяці ()
ActiveCell.FormulaR1C1 = "січень"
Selection.AutoFill Destination: = ActiveCell.Range ( "A1: A12"); _
Type: = xlFillDefault
ActiveCell.Range ( "A1: A12"). Select
End Sub
Перший рядок є коментарем. Замінимо "Місяці" на "Месяци_с_абсолютнимі_адресамі". Відповідним чином змінимо коментар. В результаті отримаємо новий текст програми макросу:
'Месяци_с_абсолютнимі_адресамі Макрос Швидкий виклик: Ctrl + o
Sub Месяци_с_абсолютнимі_адресамі ()
ActiveCell.FormulaR1C1 = "січень"
Selection.AutoFill Destination: = ActiveCell.Range ( "A1: A12"); _
Type: = xlFillDefault
ActiveCell.Range ( "A1: A12"). Select
End Sub
Нове ім'я автоматично замінить старе у списках макросів. За клавіші швидкого виклику буде викликатися макрос з новим ім'ям. Але не всі заміни відбуваються автоматично. Якщо ваш макросу були призначені графічні об'єкти або кнопки, то вам потрібно буде самим зробити для них перепризначення.
Запис в існуючий макрос нових дій
Якщо ви хочете додати макрос нові дії, то вам потрібно включити відповідний режим запису макросу. Для цього виконайте такі дії:
Зробіть активним модуль, в якому знаходиться макрос.
У тексті програми встановіть курсор в місце введення нових дій.
Виконайте команду Сервіс | Запис макросу | Відзначити позицію. Тепер ваші дії при записі макросу будуть записуватися в програму з того місця, де ви встановили курсор.
Перейдіть в лист робочої книги, де ви будете записувати нові дії.
Виконайте команду Сервіс | Запис макросу | Записати з позначки. Починаючи з цього моменту всі ваші дії будуть записуватися у макрос.
Виконайте всі додаткові дії макросу.
Натисніть на кнопку Зупинити запис.
Розглянемо конкретний приклад додавання нових записів.
Корисно спочатку виконати макрос, в який ви збираєтеся додавати нові записи. Тоді вам легше буде орієнтуватися, в якому місці таблиці встановити покажчик перед тим як почати виконувати дії.
Приклад 5. Внесення змін в існуючий макрос
Внесемо зміни в макрос "Заголовок", який був записаний в прикладі 6.2. Зміни будуть стосуватися формату заголовка. Розташуємо заголовок "Типи комп'ютерів" в центрі рядка над назвами типів і введемо інший шрифт для заголовка.
Наведемо текст програми, що реалізує макрос "Тема" і вкажемо місце розташування курсору рядком з коментарем " 'місце установки курсору".
Заголовок Макрос призначений пункт меню Сервіс "Тип ЕОМ"
Sub Заголовок ()
ActiveCell.FormulaR1C1 = "Тип комп'ютера"
ActiveCell.Offset (1; 0). Range ( "A1"). Select
ActiveCell.FormulaR1C1 = "CP_35_SR"
ActiveCell.Offset (0; 1). Range ( "A1"). Select
ActiveCell.FormulaR1C1 = "CP_40_SR"
ActiveCell.Offset (0; 1). Range ( "A1"). Select
ActiveCell.FormulaR1C1 = "CP_55_LS"
ActiveCell.Offset (0; 1). Range ( "A1"). Select
ActiveCell.FormulaR1C1 = "CP_55_SX"
ActiveCell.Offset (0; -3). Range ( "A1: D1"). Select
ActiveCell.Activate
Selection.Columns.AutoFi
'місце установки курсору
End Sub
Для внесення нових записів у макрос "Заголовок" виконайте наступні дії:
· Видаліть коментар в передостанній рядку програми і помістіть там покажчик.
· Для того щоб визначити позицію, з якою будуть записуватися нові дії, виконайте перші 5 кроків алгоритму внесення змін до макрос.
· Перед тим як виконати 6 крок алгоритму внесення змін до макрос, запустіть макрос "Заголовок". Це дозволить вам?? гранично розташування курсору на робочому аркуші, де будуть вноситися нові дії.
· Виконайте 6 крок алгоритму внесення змін до макрос. Всі подальші дії будуть записані.
· Виділіть чотири комірки, що включають заголовок "Тип комп'ютера".
· Викличте вікно діалогу "Формат комірки", натиснувши Ctrl 1.
· Виберіть вкладку "Вирівнювання", в якій встановіть прапорець Центрувати по виділенню. Таким чином ми розмістимо заголовок в середину рядка.
· Виберіть вкладку "Шрифт", в якій встановіть стиль Italic і розмір шрифту 16. Натисніть кнопку OK, щоб вийти з режиму форматування комірки.
· Натисніть кнопку Зупинити макрос.
Після завершення запису нових дій в макрос "Заголовок" ми отримали новий текст програми:
Заголовок Макрос призначений пункт меню Сервіс "Тип ЕОМ"
Sub Заголовок ()
ActiveCell.FormulaR1C1 = "Тип комп'ютера"
ActiveCell.Offset (1; 0). Range ( "A1"). Select
ActiveCell.FormulaR1C1 = "CP_35_SR"
ActiveCell.Offset (0; 1). Range ( "A1"). Select
ActiveCell.FormulaR1C1 = "CP_40_SR"
ActiveCell.Offset (0; 1). Range ( "A1"). Select
ActiveCell.FormulaR1C1 = "CP_55_LS"
ActiveCell.Offset (0; 1). Range ( "A1"). Select
ActiveCell.FormulaR1C1 = "CP_55_SX"
ActiveCell.Offset (0; -3). Range ( "A1: D1"). Select
ActiveCell.Activate
Selection.Columns.AutoFit
ActiveCell.Offset (-1; 0). Range ( "A1: D1"). Select
With Selection
. HorizontalAlignment = xlCEnterAcrossSelection
. VerticalAlignment = xlBottom
. WrapText = False
. Orientation = xlHorizontal
End With
With Selection.Font
. Name = "TimesET"
. FontStyle = "Italic"
. Size = 16
. Strikethrough = False
. Superscript = False
. Subscript = False
. OutlineFont = False
. Shadow = False
. Underline = xlNone
. ColorIndex = xlAutomatic
End With
End Sub
Перед останнім оператором програми залишилася порожній рядок. Ви можете видалити її.
Тепер результат роботи макросу "Заголовок" має такий вигляд:
Тип комп'ютера
CP_35_SR CP_40_SR CP_55_LS CP_55_SX
Призначення макросу
Призначення макросу графічному об'єкту
Макрос може бути викликана не лише натисканням клавіш швидкого виклику, але і натисканням кнопки миші на графічному об'єкті. У цьому розділі розповідається про те, як організувати такий виклик макросу.
Для призначення макросу графічному об'єкту необхідна наявність такого об'єкта на екрані. Представлені три графічних об'єкта, яким призначені макроси.
Для створення графічних об'єктів була викликана панель інструментів "Малювання". Для цього необхідно виконати команду Вид | Панелі інструментів, а потім у вікні діалогу "Панелі інструментів" встановити прапорець на рядку Малювання.
Для виклику списку панелей ви можете натиснути правою кнопкою мишки на будь-якій панелі інструментів.
Щоб намалювати зафарбований овал або прямокутник, натисніть кнопку миші на відповідному малюнку на панелі "Малювання". Вам буде запропоновано вибрати місце для об'єкта. Помістіть покажчик миші в потрібне місце таблиці та, утримуючи кнопку миші, намалюйте об'єкт - прямокутник чи овал.
Для вибору заливки об'єкта натисніть праву кнопку миші на активному об'єкті. З'явиться меню, в якому виберіть пункт Формат об'єкта. З'явиться вікно діалогу "Форматування об'єкта", в якому вибирається колір і вид заливки.
Написи на об'єктах створюються в такий спосіб:
Натисніть кнопку Текстове поле на панелі інструментів "Малювання".
Утримуючи натиснутою кнопку миші, виділіть місце для тексту.
Введіть потрібний текст і натисніть кнопку миші поза текстового вікна. Це необхідно зробити для того, щоб увійти в режим вирівнювання тексту всередині текстового вікна.
Клацніть правою кнопкою мишки на текстовому вікні. З'явиться меню, в якому виберіть пункт Формат об'єкта. У результаті з'явиться вікно діалогу "Форматування об'єкта", в якому перейдіть на вкладку "Вирівнювання".
Встановіть перемикачі вертикального і горизонтального вирівнювання в положення по центру і виберіть вкладку "Шрифт".
Встановіть стиль і розмір шрифту та натисніть клавішу OK.
Натискання Enter під час введення тексту не завершує введення, а лише переводить на наступний рядок.
Ви отримали напис на об'єкті. Зверніть увагу, що напис "Заголовок" зроблена під графічним об'єктом "прямокутник". Після того як було знайдено вдале розташування написи на об'єкті, була натиснута кнопка На задній план, розташована на панелі інструментів "Малювання" і текст виявився під об'єктом.
Ми побудували графічні об'єкти. Тепер призначимо цим графічних об'єктів макроси. Для цього виконайте такі дії:
· Натисніть кнопку миші на графічному об'єкті. Об'єкт стає активним.
· Виконайте команду Сервіс | Призначити макрос. З'явиться вікно діалогу зі списком макросів.
· Виберіть потрібний макрос та натисніть на ньому кнопку миші. Ім'я макросу з'явиться у верхній частині вікна діалогу.
· Натисніть кнопку OK. Ви вийдете з режиму призначення макросу. Графічний об'єкт залишається активним. Натисніть кнопку миші в будь-якому місці поза об'єктом.
Об'єкт стає активним, коли на його кордоні з'являються чорні квадратики. Якщо графічний об'єкт не призначено макросу, то щоб зробити його активним досить натиснути на ньому кнопку миші. Якщо призначення макросу графічному об'єкту вже зроблено, то щоб зробити його активним потрібно натиснути на ньому одночасно кнопку миші та клавішу Ctrl.
Призначити макрос графічному об'єкту можна й іншим способом. Клацніть правою кнопкою миші на об'єкті. З меню, що з'явилося виберіть команду Призначити макрос і зі списку макросів виберіть потрібний.
Макрос призначений графічному об'єкту. Якщо тепер помістити курсор миші на цей об'єкт, то білий хрестик перейде в зображення руки з відігнутим вказівним пальцем. Натискання лівої кнопки миші призводить до виконання макросу, який призначений цьому об'єкту.
Приклад 6. Призначення макросу графічному об'єкту
Призначимо макрос "Число" графічному об'єкту "стрілка". Для цього виконайте такі дії:
· Натисніть кнопку з зображенням стрілки на панелі інструментів "Малювання".
· Встановіть курсор в потрібне місце таблиці та, утримуючи кнопку миші, проведіть стрілку.
· Натисніть кнопку Текстове поле на панелі інструментів "Малювання" і, утримуючи кнопку миші, виділіть місце для тексту.
· Введіть текст "Кількість" та натисніть кнопку миші поза текстового поля.
· Клацніть правою кнопкою мишки на текстовому вікні. З'явиться меню, в якому виберіть пункт Формат об'єкта. Після цього з'явиться вікно діалогу "Форматування об'єкта". У цьому вікні нам знадобляться вкладки: "Вирівнювання", "Шрифт" і "Вид". У вкладці "Вирівнювання" встановіть перемикачі вертикального і горизонтального вирівнювання в положення по центру. У вкладці "
Шрифт "виберіть шрифт TimesET, стиль Italic, розмір 16. У вкладці "Вид" виберіть варіант Рамка в положення Ні, в результаті чого рамка навколо тексту буде відсутній.
· Натисніть клавішу OK. Графічний об'єкт побудований.
· Натисніть кнопку На задній план, розташовану на панелі інструментів "Малювання". Текст виявився під стрілкою.
· Натисніть кнопку миші на графічному об'єкті. Об'єкт стає активним.
· Клацніть правою кнопкою миші, коли її покажчик знаходиться на об'єкті. З'явиться меню зі списком команд.
· Виберіть Призначити макрос. З'явиться вікно діалогу "Призначити макрос об'єкту" зі списком створених макросів.
· Виберіть макрос "Число". Ім'я макросу з'явиться у верхній частині вікна діалогу.
· Натисніть кнопку OK. Ви призначили макрос графічному об'єкту. Натисніть кнопку миші поза об'єктом, щоб він перестав бути активним.
Якщо помістити курсор миші на зображення стрілки, то білий хрестик перейде в зображення руки з відігнутим вказівним пальцем. Натискання лівої кнопку миші призводить до виконання макросу "Число".
Приклад 7. Призначення макросу малюнку
Представлені три малюнки, яким призначені створені нами макроси "Місяць", "Тема" і "Кількість".
Призначення макросу малюнку нічим не відрізняється від призначення макросу графічному об'єкту, яка була розглянута раніше. Малюнки взяті з каталогу Windows. Вони містяться у файлах WINLOGO.BMP, EGYPT.BMP і ARCHES.BMP.
Для призначення макросу малюнку потрібно виконати наступні дії:
· Виконайте команду Вставка | Малюнок. З'явиться вікно діалогу вибору малюнка.
· Виберіть каталог Windows. У вікні діалогу з'явиться список графічних файлів.
· Виберіть файл WINLOGO.BMP і вибраний малюнок з'явиться на робочому листі Excel.
· Клацніть правою кнопкою миші, коли її покажчик знаходиться на активному малюнку.
· З спливаючого меню виберіть команду Призначити макрос. З'явиться вікно діалогу зі списком макросів, в якому виберіть потрібний. Натискання кнопки OK завершує процес призначення.
· Натисніть кнопку миші поза малюнка, щоб він перестав бути активним.
В осередках A1: A3 ви можете побачити результат роботи макросу "Кількість", який був призначений малюнку "winlogo". Для отримання результату ми виділили клітинки A1: A3 і перемістили вказівник миші на малюнок "winlogo". Натискання кнопки миші призвело до виконання макросу "Кількість", тобто до форматування комірок A1: A3.
4. Приклади макросів
Службовою кнопці Excel також можна призначити макрос. При цьому вона втратить своє первісне призначення. Для відновлення службової кнопки спочатку видаліть його з панелі в режимі настройки, а потім перемістіть оригінал з відповідної категорії кнопок на потрібну панель інструментів.
У цьому розділі ми наведемо приклади макросів, які виконують такі функції:
1 Заповнення комірки числами, які є членами арифметичної прогресії з різницею рівний 0,5
2 Призначення вбудованого формату діаграм
3 Вставка значення замість формул
Приклад 10. Макрос "Прогресія"
У результаті роботи макросу "Прогресія" виділені в рядку клітинки заповнюються числами, які є членами арифметичної прогресії з різницею рівний 0,5 або з кроком 0,5.
Для запису макросу "Прогресія" виконайте наступні дії:
· Введіть у клітинку A1 число 1000 і виділіть комірки A1: C1.
· Виконайте команду Сервіс | Запис макросу | Почати запис. З'явиться вікно діалогу "Запис макросу".
· Введіть у поле введення Ім'я макросу назва записуваного макросу Прогресія та натисніть кнопку Параметри. Вікно діалогу "Запис макросу" розширюється.
· Перейдіть на латинський регістр і введіть літеру p для клавіші швидкого виклику макросу.
· Натисніть кнопку OK у вікні діалогу "Запис макросу", яке після цього закриється. Починаючи з цього моменту, всі ваші дії будуть записуватися у макрос. У рядку стану з'явиться слово "Запис".
· Виконайте команду Правка | Заповнити | Прогресія. З'явиться вікно діалогу «Прогресія».
· Встановіть прапорець по рядках. Це означає, що прогресія буде будується у виділеній рядку.
· Встановіть прапорець арифметична. Це означає, що комірки в рядку буде заповнюватися числами, які є членами арифметичної прогресії.
· У вікні "Крок" введіть число 0,5 - різниця арифметичної прогресії.
· Натисніть кнопку OK, щоб вийти з вікна діалогу "Прогресія". Тепер потрібно закінчити запис макросу.
· Натисніть кнопку Зупинити макрос.
Отже, результати роботи макросу "Прогресія". Він запускається натисканням Ctrl + p. Перед цим потрібно ввести перший член прогресії і виділити клітинки в рядку, де розміщуватимуться члени арифметичної прогресії з різницею 0,5.
Після натискання клавіш Ctrl + p комірки A1: G1 заповняться числами 1000 1000,5 1001 1001,5 1002 1002,5 1003.
Якщо перший осередок серед виділених не містить число, то заповнення числами не відбудеться і осередки залишаться без зміни.
Приклад 11. Макрос "Діаграма"
Цей макрос буде відновлювати стандартну діаграму Excel. Якщо ви будували графіки з використанням призначеного для користувача автоформату діаграм, то для переходу до стандартної діаграмі Excel вам досить буде запустити цей макрос.
Для запису макросу "Діаграма" виконайте наступні дії:
· Виконайте команду Сервіс | Запис макросу | Почати запис. З'явиться вікно діалогу "Запис макросу".
· Введіть у поле введення Ім'я макросу назва записуваного макросу Діаграма та натисніть кнопку Параметри.
· Перейдіть на латинський регістр і введіть літеру d для клавіші швидкого виклику макросу.
· Натисніть кнопку OK у вікні діалогу "Запис макросу". Починаючи з цього моменту всі ваші дії будуть записуватися у макрос. У рядку стану з'явиться слово "Запис".
· З меню Сервіс виберіть команду Параметри. З'явиться вікно діалогу "Параметри".
· Виберіть вкладку "Діаграма". У полі введення списку Формат діаграми за замовчуванням відображається назва останнього що використовувався для користувача автоформату діаграми.
· У списку Формат діаграми за замовчуванням за допомогою смуги прокручування знайдіть значення Вбудована та натисніть кнопку OK.
· Натисніть кнопку Зупинити макрос.
До запуску макросу "Діаграма" як діаграми за замовчуванням будувалася діаграма формату Лініі.После натиснення клавіш Ctrl + d як діаграми за замовчуванням буде використовуватися Вбудована. Макрос змінює значення формату для стандартної діаграми. Обидві діаграми побудовані на наборі даних A1: E4, але з використанням різних форматів.
Приклад 12. Макрос "Значення"
Дія цього макросу аналогічно натиснення кнопки Вставити значення. В осередку залишається тільки результат роботи формули, а сама формула зникає. Це дуже важлива функція, тому наведемо алгоритм запису відповідних дій у макрос, який згодом буде викликатися натисканням Ctrl + v.
Для запису макросу "Значення" виконайте наступні дії:
· Для наочності введіть в комірки A1 та A2 якісь формули, наприклад, такого вигляду: = COS (D1), = COS (D2). В осередках D1 та D2 розташовані числа.
· Перейдіть до комірки A1 та A2.
· Виконайте команду Сервіс | Запис макросу | Почати запис. З'явиться вікно діалогу "Запис макросу".
· Введіть у поле введення Ім'я макросу назва записуваного макросу Значення та натисніть кнопку Параметри.
· Перейдіть на латинський регістр і введіть літеру v для клавіші швидкого виклику макросу.
· Натисніть кнопку OK у вікні діалогу "Запис макросу". Починаючи з цього моменту всі ваші дії будуть записуватися у макрос.
· Виконайте команду Правка | Копіювати.
· Натисніть мишею в перший осередок виділеної області. У нашому випадку це осередок A1.
· Виконайте команду Правка | Спеціальна вставка. З'явиться вікно діалогу "Спеціальна вставка".
· Встановіть ознака Значення.
· Натисніть кнопку OK для виходу з вікна діалогу "Спеціальна вставка".
· Натисніть мишею в перший осередок виділеної області. У нашому випадку це осередок A1.
· Натисніть клавішу Esc.
· Натисніть кнопку Зупинити макрос.
Робота з макросом "Значення" здійснюється в такий спосіб. Спочатку натисніть на блок осередків, в яких присутні формули, а потім натисніть Ctrl + v. У виділених клітинках залишаться лише значення формул.
Результатом роботи формул може бути текст. Після натискання Ctrl + v формули зникнуть і залишиться тільки текст.
Якщо ви хочете використовувати макрос "Значення" замість команди Спеціальна вставка, запишіть його з відносними посиланнями.
5. Висновок
І у підсумку, доцільно узагальнити всі раніше сказане і виділити основні моменти.
1 Макрос являє собою записану послідовність певних дій.
2 Для запису макросу виконайте команду Сервіс | Запис макросу.
3 Призначення існуючого макросу клавіші швидкого виклику та пункту меню виконується за допомогою команди Сервіс | Макрос.
4 Команда З відносними посиланнями записує макрос, що обробляє дані в будь-якому місці робочої книги.
5 Редагувати текст макросу можна безпосередньо в модулі з текстом.
6 Для видалення макросу натисніть мишею на його імені. При цьому стануть доступними кнопки вікна діалогу "Макрос", у тому числі кнопка Видалити.
7 Команда Сервіс | Призначити макрос призначає макроси графічних об'єктів.
8 Введіть у поле введення Ім'я макросу назва створюваного макросу і запишіть новий макрос.
9 Ви можете вносити зміни безпосередньо в текст програми, у якій на мові Visual Basic for Applications записана послідовність дій макросу.
10 Записаний макрос можна запустити на виконання одним з таких способів:
- З основного меню
- За допомогою кнопки на панелі інструментів
- За допомогою кнопки на робочі?? й області
- Натисканням комбінації клавіш клавіатури
- Натисненням кнопкою мишки на графічному об'єкті
Список літератури.
1. Excel 7 для windows 95. Довідник Штайнер Й.1997
2. Excel 7.0: Загальні та економічні розрахунки. Матюшок В.М. 1997
