Ви можете приховати неактивні аркуші за допомогою цього макросу. Excel не дозволяє приховати всі аркуші в книзі; принаймні один має бути відображений. Однак ви можете приховати всі, крім активного аркуша.
Макрос тут перебирає аркуші та співставляє назву кожного аркуша з ім’ям активного аркуша. Кожного разу, коли макрос зациклюється, він приховує будь-який невідповідний аркуш.
Підмакрос1()
'Крок 1: Оголошення змінних
Dim ws As Worksheet
«Крок 2: Почніть перебирати всі аркуші
Для кожного ws In ThisWorkbook.Worksheets
«Крок 3. Перевірте назву кожного аркуша
Якщо ws.Name <> ThisWorkbook.ActiveSheet.Name Then
«Крок 4: Сховайте аркуш
ws.Visible = xlSheetHidden
Кінець Якщо
«Крок 5: Перейдіть до наступного аркуша
Далі ws
Кінець суб
Крок 1 оголошує об’єкт під назвою ws. На цьому етапі створюється контейнер пам’яті для кожного робочого аркуша, через який проходить макрос.
Крок 2 розпочинає цикл, вказуючи Excel оцінити всі аркуші в цій книзі. Зверніть увагу на різницю між ThisWorkbook і ActiveWorkbook. Об’єкт ThisWorkBook посилається на книгу, яка містить код. Об’єкт ActiveWorkBook посилається на поточну активну книгу. Вони часто повертають один і той же об’єкт, але якщо книга, на якій виконується код, не є активною книгою, вони повертають різні об’єкти. У цьому випадку ви не хочете ризикувати приховати аркуші в інших книгах, тому ви використовуєте ThisWorkBook.
На кроці 3 макрос просто порівнює ім’я активного аркуша з аркушем, який зараз зациклюється.
Якщо назви аркушів відрізняються, макрос приховує аркуш на кроці 4.
На кроці 5 ви повертаєтеся назад, щоб отримати наступний аркуш. Після того, як усі аркуші оцінені, макрос завершується.
Зверніть увагу, що ви використовуєте xlsheetHidden у своєму макросі. Ця властивість застосовує стан приховування за замовчуванням, який ви зазвичай отримуєте, клацнувши правою кнопкою миші на аркуші та вибравши Сховати. У цьому стані приховування за замовчуванням користувач може клацнути правою кнопкою миші будь-яку вкладку та вибрати «Показати», щоб відобразити всі приховані аркуші. Але інший прихований стан є більш таємним, ніж стандартний. Якщо ви використовуєте xlSheetVeryHidden, щоб приховати свої аркуші, користувачі взагалі не зможуть їх побачити — навіть якщо вони клацнуть правою кнопкою миші вкладку та виберуть Показати. Єдиний спосіб показати прихований таким чином аркуш - це використовувати VBA.
Щоб реалізувати цей макрос, ви можете скопіювати та вставити його в стандартний модуль:
Активуйте редактор Visual Basic, натиснувши Alt+F11.
Клацніть правою кнопкою миші назву проекту/книги у вікні проекту.
Виберіть «Вставка»→ «Модуль».
Введіть або вставте код у щойно створений модуль.
Як заборонити Microsoft Word відкривати файли в режимі лише для читання в Windows. Microsoft Word відкриває файли в режимі лише для читання, що робить неможливим їх редагування? Не хвилюйтеся, методи наведено нижче
Як виправити помилки під час друку неправильних документів Microsoft Word Помилки під час друку документів Word зі зміненими шрифтами, безладними абзацами, відсутнім текстом або втраченим вмістом є досить поширеними. Однак не варто
Якщо ви використовували перо або маркер для малювання на слайдах PowerPoint під час презентації, ви можете зберегти малюнки для наступної презентації або стерти їх, щоб наступного разу, коли ви показуватимете їх, розпочали з чистих слайдів PowerPoint. Дотримуйтесь цих інструкцій, щоб стерти малюнки пером і маркером: Стирання рядків на одній з […]
Бібліотека стилів містить файли CSS, файли мови розширюваної мови таблиць стилів (XSL) та зображення, які використовуються попередньо визначеними основними сторінками, макетами сторінок та елементами керування в SharePoint 2010. Щоб знайти файли CSS у бібліотеці стилів сайту видавництва: виберіть «Дії сайту»→ «Перегляд». Весь вміст сайту. З’являється вміст сайту. Бібліотека Style знаходиться в […]
Не перевантажуйте аудиторію гігантськими цифрами. У Microsoft Excel ви можете покращити читабельність своїх інформаційних панелей і звітів, відформатувавши числа, щоб вони відображалися в тисячах або мільйонах.
Дізнайтеся, як використовувати інструменти соціальних мереж SharePoint, які дозволяють особам і групам спілкуватися, співпрацювати, обмінюватися інформацією та спілкуватися.
Юліанські дати часто використовуються у виробничих середовищах як мітка часу та швидкий довідник для номера партії. Цей тип кодування дати дозволяє роздрібним продавцям, споживачам та агентам з обслуговування визначити, коли був виготовлений продукт, а отже, і вік продукту. Юліанські дати також використовуються в програмуванні, військовій справі та астрономії. Інший […]
Ви можете створити веб-програму в Access 2016. Так що ж таке веб-програма? Ну, веб означає, що він онлайн, а додаток — це просто скорочення від «додаток». Користувацька веб-програма — це онлайн-додаток для баз даних, доступ до якого здійснюється з хмари за допомогою браузера. Ви створюєте та підтримуєте веб-програму у настільній версії […]
Більшість сторінок у SharePoint 2010 відображають список посилань навігації на панелі швидкого запуску ліворуч. Панель швидкого запуску відображає посилання на пропонований вміст сайту, наприклад списки, бібліотеки, сайти та сторінки публікації. Панель швидкого запуску містить два дуже важливі посилання: Посилання на весь вміст сайту: […]
Для простих задач Solver в Excel зазвичай швидко знаходить оптимальні значення змінної Solver для цільової функції. Але в деяких випадках Solver має проблеми з пошуком значень змінної Solver, які оптимізують цільову функцію. У цих випадках Solver зазвичай відображає повідомлення або повідомлення про помилку, що описує або обговорює проблему, яка […]
