Примушування ваших клієнтів увімкнути макроси Excel

Щоб використовувати будь-який макрос в Excel, ваші користувачі повинні ввімкнути макроси. Тобто вони повинні надати Excel дозвіл на запуск макросів у своєму середовищі. Щоб увімкнути макроси, користувачі натискають кнопку Увімкнути вміст у попередженні системи безпеки, яке з’являється над рядком формул.

Примушування ваших клієнтів увімкнути макроси Excel

Суть полягає в тому, що ви можете написати всі модні макроси в світі, але вони ніколи не запускатимуться, якщо ваші користувачі не ввімкнуть макроси. Це викликає запитання; чи можна змусити користувачів увімкнути макроси? Відповідь – так – з невеликою хитрістю.

Ідея відносно проста. Ви створюєте аркуш із назвою, скажімо, START. На цьому аркуші міститься лише просте попередження про те, що макроси повинні бути ввімкнені. Потім ви приховаєте всі аркуші в книзі, крім цього листа START. Нарешті, ви пишете простий макрос, який показує всі аркуші під час відкриття книги.

Примушування ваших клієнтів увімкнути макроси Excel

На цьому етапі, коли книгу буде відкрито, Excel попросить користувача увімкнути макроси. Користувачі будуть змушені зробити це, тому що все, що вони побачать, це ваш стартовий аркуш. Інші аркуші будуть сховані!

Щоб ця техніка працювала, вам знадобляться два макроси: один макрос приховує всі, крім аркуша START, коли книга закривається, а інший макрос, який показує всі, крім аркуша START, коли книга відкривається.

По-перше, виконайте дії, які мають відбутися після закриття книги. :

Активуйте редактор Visual Basic, натиснувши ALT+F11 на клавіатурі

У вікні «Проект» знайдіть назву проекту/книги та клацніть знак «плюс», щоб побачити всі аркуші.

Натисніть Цей зошит.

У спадному списку «Подія» виберіть подію «До закриття».

Примушування ваших клієнтів увімкнути макроси Excel

Введіть або вставте наступний код:

Приватна підпорядкована робоча книга_BeforeClose(Скасувати як логічне значення)
'Крок 1: Оголошення змінних
  Dim ws As Worksheet
«Крок 2. Відкрийте початковий аркуш
  Sheets("START").Visible = xlSheetVisible
«Крок 3: Почніть перебирати всі аркуші
  Для кожного ws In ThisWorkbook.Worksheets
«Крок 4. Перевірте назву кожного аркуша
  Якщо ws.Name <> "START" Тоді
«Крок 5: Сховайте аркуш
  ws.Visible = xlVeryHidden
  Кінець Якщо
«Крок 6: Перейдіть до наступного аркуша
  Далі ws
«Крок 7: Збережіть робочу книгу
  ActiveWorkbook.Save
Кінець суб

На кроці 1 ви оголошуєте об’єкт під назвою ws, щоб створити контейнер пам’яті для кожного аркуша, який ви будете перебирати.

На кроці 2 ви переконаєтеся, що аркуш START є видимим.

На кроці 3 ви починаєте цикл, повідомляючи Excel, що хочете оцінити всі аркуші в цій книзі.

На кроці 4 ви просто порівнюєте назву START з аркушем, який зараз зациклюється. Цей крок гарантує, що наступні дії будуть застосовані до всіх аркушів, крім листа START.

Якщо назви аркушів відрізняються, на кроці 5 ви приховаєте аркуш за допомогою властивості xlVeryHidden. Ця властивість не тільки приховує аркуш, але й не дозволяє користувачеві вручну розкривати його за допомогою інтерфейсу користувача.

Ви повертаєтеся назад, щоб отримати наступний аркуш на кроці 6.

На кроці 7 після оцінки всіх аркушів макрос зберігає книгу та завершує роботу.

Тепер вам потрібно написати макрос для обробки всіх дій, які мають відбутися під час відкриття книги:

Активуйте редактор Visual Basic, натиснувши ALT+F11.

У вікні «Проект» знайдіть назву проекту/книги та клацніть знак «плюс», щоб побачити всі аркуші.

Натисніть Цей зошит.

У спадному списку «Подія» виберіть «Відкрити».

Примушування ваших клієнтів увімкнути макроси Excel

Введіть або вставте наступний код:

Приватна додаткова робоча книга_Open()
'Крок 1: Оголошення змінних
  Dim ws As Worksheet
«Крок 2: Почніть перебирати всі аркуші
  Для кожного ws In ThisWorkbook.Worksheets
'Крок 3: Показати всі робочі аркуші
  ws.Visible = xlSheetVisible
«Крок 4: Перейдіть до наступного аркуша
  Далі ws
«Крок 5: сховайте початковий аркуш
  Sheets("START").Видимо = xlVeryHidden
Кінець суб

На кроці 1 ви оголошуєте об’єкт з назвою ws, щоб створити контейнер пам’яті для кожного аркуша, який ви перебираєте.

На кроці 2 ви починаєте цикл, повідомляючи Excel, що хочете оцінити всі аркуші в цій книзі.

На кроці 3 ви показуєте аркуш, який зараз зациклюється. Цей крок ефективно показує всі аркуші, оскільки кожен аркуш стає видимим.

Ви повертаєтеся назад, щоб отримати наступний аркуш на кроці 4.

Після того, як усі аркуші стануть видимими, крок 5 приховує аркуш START. Знову ж таки, ви використовуєте властивість xlVeryHidden, щоб користувач не міг вручну показати аркуш за допомогою інтерфейсу користувача.

Після того, як обидва макроси будуть реалізовані, у вас буде книга, яка працюватиме, лише якщо користувач увімкне макроси!

Leave a Comment

Як спілкуватися в чаті в Outlook Web App

Як спілкуватися в чаті в Outlook Web App

Досліджуйте, як ефективно спілкуватися в чаті з колегами в Outlook Web App. Дізнайтеся про покрокову інструкцію та нові можливості для підвищення продуктивності.

Як заборонити Microsoft Word відкривати файли в режимі лише для читання в Windows

Як заборонити Microsoft Word відкривати файли в режимі лише для читання в Windows

Як заборонити Microsoft Word відкривати файли в режимі лише для читання в Windows. Microsoft Word відкриває файли в режимі лише для читання, що робить неможливим їх редагування? Не хвилюйтеся, методи наведено нижче

Як виправити неправильний друк документів Microsoft Word

Як виправити неправильний друк документів Microsoft Word

Як виправити помилки під час друку неправильних документів Microsoft Word Помилки під час друку документів Word зі зміненими шрифтами, безладними абзацами, відсутнім текстом або втраченим вмістом є досить поширеними. Однак не варто

Зітріть малюнки ручкою та маркером на слайдах PowerPoint

Зітріть малюнки ручкою та маркером на слайдах PowerPoint

Якщо ви використовували перо або маркер для малювання на слайдах PowerPoint під час презентації, ви можете зберегти малюнки для наступної презентації або стерти їх, щоб наступного разу, коли ви показуватимете їх, розпочали з чистих слайдів PowerPoint. Дотримуйтесь цих інструкцій, щоб стерти малюнки пером і маркером: Стирання рядків на одній з […]

Вміст бібліотеки стилів у SharePoint 2010

Вміст бібліотеки стилів у SharePoint 2010

Бібліотека стилів містить файли CSS, файли мови розширюваної мови таблиць стилів (XSL) та зображення, які використовуються попередньо визначеними основними сторінками, макетами сторінок та елементами керування в SharePoint 2010. Щоб знайти файли CSS у бібліотеці стилів сайту видавництва: виберіть «Дії сайту»→ «Перегляд». Весь вміст сайту. З’являється вміст сайту. Бібліотека Style знаходиться в […]

Форматуйте числа в тисячах і мільйонах у звітах Excel

Форматуйте числа в тисячах і мільйонах у звітах Excel

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

Як ділитися сайтами SharePoint і слідкувати за ними

Як ділитися сайтами SharePoint і слідкувати за ними

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

Як перетворити дати в юліанські формати в Excel

Як перетворити дати в юліанські формати в Excel

Юліанські дати часто використовуються у виробничих середовищах як мітка часу та швидкий довідник для номера партії. Цей тип кодування дати дозволяє роздрібним продавцям, споживачам та агентам з обслуговування визначити, коли був виготовлений продукт, а отже, і вік продукту. Юліанські дати також використовуються в програмуванні, військовій справі та астрономії. Інший […]

Як створити веб-програму Access

Як створити веб-програму Access

Ви можете створити веб-програму в Access 2016. Так що ж таке веб-програма? Ну, веб означає, що він онлайн, а додаток — це просто скорочення від «додаток». Користувацька веб-програма — це онлайн-додаток для баз даних, доступ до якого здійснюється з хмари за допомогою браузера. Ви створюєте та підтримуєте веб-програму у настільній версії […]

Панель швидкого запуску в SharePoint 2010

Панель швидкого запуску в SharePoint 2010

Більшість сторінок у SharePoint 2010 відображають список посилань навігації на панелі швидкого запуску ліворуч. Панель швидкого запуску відображає посилання на пропонований вміст сайту, наприклад списки, бібліотеки, сайти та сторінки публікації. Панель швидкого запуску містить два дуже важливі посилання: Посилання на весь вміст сайту: […]