Автоматичний запуск макросу під час відкриття книги

Увага! : Цю статтю перекладено за допомогою служби машинного перекладу; див. застереження. Версію цієї статті англійською мовою див. тут для отримання довідки.

Ви можете макрос, який зазначено на автоматичний запуск під час відкриття певної книги. Наведені нижче дії використовує приклад, щоб показати, що роботу. Ви також можете запускати макроси автоматично, під час запуску програми Excel.

Перед початком роботи переконайтеся, що на стрічці відображається вкладка Розробник. Якщо вона не відображається, зробіть ось що.

  1. Відкрийте вкладку Файл > Параметри > Настроювання стрічки.

  2. У розділі Настроїти стрічку в полі Основні вкладки встановіть прапорець біля поля Розробник.

  3. Натисніть кнопку OK.

Щоб використати наведений нижче приклад у своїй книзі, створіть аркуші на всі дні місяця та відповідним чином назвіть кожен аркуш. Наприклад, назвіть їх «1 березня», «2 березня» тощо до «31 березня». Макрос автоматично запускатиметься під час відкриття книги, відкриваючи аркуш для поточного дня місяця.

  1. На вкладці Розробник натисніть кнопку Visual Basic.

Група "Код" на вкладці "Розробник"

  1. Послідовно виберіть елементи Вставити > Модуль.

  2. У модулі вставте такий код:

    Приватна Sub Auto_Open()
    Dim vntToday як варіант
    vntToday = WorksheetFunction.Text (дата, "мммм ДД")
    на помилки резюме наступна
    Sheets(vntToday). Виберіть пункт
    якщо степінь похибки <> 0 натисніть
    MsgBox "Аркуш не існує."
    Ще
    Range("A1"). Виберіть пункт
    кінець, якщо
    завершити Sub

  3. Закрийте вікно Visual Basic (не потрібно нічого зберігати).

  4. Збережіть книгу як книгу Excel із підтримкою макросів (XLSM) і закрийте її.

Після наступного відкриття книги відображатиметься аркуш поточного дня, а курсор буде розташовано у клітинці A1. Якщо аркуша для поточного дня не існує, відобразиться повідомлення «Аркуша не існує».

Порада : Ви можете створювати нову книгу для кожного наступного місяця, повторно створюючи цей макрос для кожної нової книги.

Примітка : Застереження про машинний переклад: Цю статтю перекладено комп’ютерною системою без втручання людини. Корпорація Майкрософт пропонує таку послугу, щоб іншомовні користувачі могли дізнаватися про продукти, служби й технології Microsoft. Оскільки статтю перекладено за допомогою служби машинного перекладу, вона може містити смислові, синтаксичні або граматичні помилки.

Отримуйте нові функції раніше за інших
Приєднайтеся до оцінювачів Office

Ця інформація корисна?

Дякуємо за ваш відгук!

Дякуємо за відгук! Схоже, вам може стати в нагоді допомога одного з наших спеціалістів служби підтримки Office, з яким ми вас можемо з’єднати.

×