Урок пояснює, як приховати робочі аркуші в Excel 2016, 2013, 2010 і нижче. Ви дізнаєтеся, як швидко приховати аркуш, клацнувши правою кнопкою миші, і як приховати всі аркуші одночасно за допомогою коду VBA.

Уявіть собі: ви відкриваєте робочий аркуш і помічаєте, що деякі формули посилаються на інший аркуш. Ви дивитеся на вкладки аркуша, але таблиці, на яку є посилання, там немає! Ви намагаєтеся створити новий аркуш з таким же ім'ям, але Excel повідомляє вам, що він вже існує. Що це все означає? Просто, робочий аркуш прихований. Як переглянути приховані аркуші в Excel? Очевидно, що вам доведеться їх приховати. Це може бутивиконується вручну за допомогою програми Excel Роздягнутися Цей урок навчить вас обом методам.

Як приховати аркуші в Excel

Якщо ви хочете побачити лише один або два приховані аркуші, ось як ви можете швидко їх розкрити:

1. У книзі Excel клацніть правою кнопкою миші на будь-якій вкладці аркуша і виберіть Роздягнутися ... з контекстного меню.
2. В рамках проекту Роздягнутися виберіть прихований аркуш, який потрібно відобразити, і натисніть кнопку ГАРАЗД. (або двічі клацніть по назві аркуша). Готово!

Крім контекстного меню, яке викликається правою кнопкою миші, можна скористатися пунктом Роздягнутися діалогове вікно можна відкрити зі стрічки:

• В Excel 2003 і більш ранніх версіях натисніть кнопку Формат меню, а потім натисніть Лист > Роздягнутися .
• В Excel 2016, Excel 2013, Excel 2010 і Excel 2007 перейдіть на вкладку Головна сторінка вкладка> Клітини і натисніть кнопку Формат Під Видимість вкажіть на Приховати та розкрити , а потім натисніть Розкрити аркуш ...

Примітка. Excel's Роздягнутися дозволяє вибрати лише один аркуш за раз. Щоб приховати кілька аркушів, вам доведеться повторити вищевказані кроки для кожного аркуша окремо, або ви можете приховати всі аркуші за один раз, використовуючи наведені нижче макроси.

Як приховати аркуші в Excel за допомогою VBA

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

Як приховати всі аркуші в Excel

Цей невеликий макрос робить всі приховані аркуші в активній книзі видимими відразу, не турбуючи вас ніякими повідомленнями.

Sub Unhide_All_Sheets() Dim wks As Worksheet For Each wks In ActiveWorkbook.Worksheets wks.Visible = xlSheetVisible Next wks End Sub

Показати всі приховані аркуші та відобразити їх кількість

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

Sub Unhide_All_Sheets_Count() Dim wks As Worksheet Dim count As Integer count = 0 For Each wks In ActiveWorkbook.Worksheets If wks.Visible xlSheetVisible Then wks.Visible = xlSheetVisible count = count + 1 End If Next wks If count> 0 Then MsgBox count & "Аркуші розгорнуто." , vbOKOnly, "Розгортання аркушів" Else MsgBox "Прихованих аркушів не знайдено." , vbOKOnly,"Приховування робочих аркушів" End If End Sub

Приховати кілька вибраних аркушів

Якщо ви бажаєте не приховувати всі аркуші одразу, а лише ті, які користувач явно погодився зробити видимими, то нехай макрос запитує про кожен прихований аркуш окремо, як це зроблено нижче:

Sub Unhide_Selected_Sheets() Dim wks As Worksheet Dim MsgResult As VbMsgBoxResult For Each wks In ActiveWorkbook.Worksheets If wks.Visible = xlSheetHidden Then MsgResult = MsgBox( "Приховати аркуш " & wks.Name & "?" , vbYesNo, "Приховати аркуші" ) If MsgResult = vbYes Then wks.Visible = xlSheetVisible End If Next End Sub

Приховати аркуші з певним словом у назві аркуша

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

У даному прикладі ми розкриваємо листи зі словом " доповідь " в назві. Макрос виведе на екран такі аркуші, як Звіт , Звіт 1 , Липневий звіт тощо.

Щоб приховати аркуші, назви яких містять якесь інше слово, замініть " доповідь " в наступному коді власним текстом.

Sub Unhide_Sheets_Contain() Dim wks As Worksheet Dim count As Integer count = 0 For Each wks In ActiveWorkbook.Worksheets If (wks.Visible xlSheetVisible) And (InStr(wks.Name, "report" )> 0) Then wks.Visible = xlSheetVisible count = count + 1 End If Next wks If count> 0 Then MsgBox count & "Аркуші розконсервовано." , vbOKOnly, "Розконсервувати аркуші" Else MsgBox "Аркуші розконсервовано.знайдено аркуші з вказаною назвою." , vbOKOnly, "Приховування аркушів" End If End Sub

Як за допомогою макросів приховати аркуші в Excel

Для використання макросів на робочому аркуші можна або скопіювати/вставити код в редакторі Visual Basic, або завантажити книгу з макросами і запустити їх звідти.

Як вставити макрос в книгу

Таким чином можна додати будь-який з наведених вище макросів до робочої книги:

1. Відкрийте книгу з прихованими аркушами.
2. Натисніть Alt + F11, щоб відкрити редактор Visual Basic.
3. На лівій панелі натисніть правою кнопкою миші ThisWorkbook та оберіть Вставка > Модуль з контекстного меню.
4. Вставте код у вікні Код.
5. Натисніть F5, щоб запустити макрос.

Детальну покрокову інструкцію див. у статті Як вставити і запустити код VBA в Excel.

Завантажити робочий зошит з макросами

Крім того, ви можете завантажити наш зразок книги для розкриття аркушів в Excel, який містить всі макроси, розглянуті в цьому посібнику:

• Розкрити_всі_аркуші - миттєво і безшумно розкрити всі аркуші в активній книзі.
• Розкрити_всі_аркуші_підрахунок - показати всі приховані аркуші разом з їх кількістю.
• Розкрити_вибрані_аркуші - відобразити приховані аркуші, які ви вирішили розкрити.
• Unhide_Sheets_Contain - розкрити аркуші, назви яких містять певне слово або текст.

Щоб запустити макроси в Excel, необхідно виконати наступні дії:

1. Відкрийте завантажену книгу та увімкніть макроси, якщо з'явиться відповідний запит.
2. Відкрийте власну книгу, в якій ви хочете бачити приховані аркуші.
3. У робочій книзі натисніть Alt + F8 , виберіть потрібний макрос і натисніть Біжи .

Наприклад, щоб розкрити всі аркуші у файлі Excel і відобразити кількість прихованих аркушів, потрібно запустити цей макрос:

Як показати приховані аркуші в Excel, створивши користувацьке подання

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

Отже, те, що ми збираємося зробити зараз, - це створити Показати всі аркуші нестандартний вид. Ось як:

1. Переконайтеся, що всі електронні таблиці у вашій робочій книзі видимий Ця підказка показує, як швидко перевірити книгу на наявність прихованих аркушів.
2. Перейдіть на сторінку Вид вкладка> Робоча книга Подання і натисніть кнопку Користувацькі перегляди кнопку.

На сьогоднішній день, на жаль, це не так. Спеціальний вид з'явиться діалогове вікно, в якому потрібно натиснути Додати...

в Додати вид введіть назву для вашого користувацького подання, наприклад Показати всі аркуші і натисніть OK.

Тепер ви можете приховати стільки робочих аркушів, скільки вам потрібно, а коли ви захочете знову зробити їх видимими, натисніть кнопку Користувацькі подання виберіть кнопку ShowAllSheet переглянути та натиснути Показати або просто двічі клацніть на зображенні.

Все! Всі приховані аркуші будуть показані негайно.

Як перевірити, чи є в книзі приховані аркуші

Найшвидший спосіб виявити приховані аркуші в Excel такий: клацніть правою кнопкою миші на будь-якій вкладці аркуша і подивіться, чи не з'явився Сховайся... Якщо вона включена, клацніть по ній і подивіться, які аркуші приховані. Якщо вона відключена (виділена сірим кольором), то книга не містить прихованих аркушів.

Примітка: Цей метод не відображає дуже приховані аркуші. Єдиний спосіб переглянути такі аркуші - це розкрити їх за допомогою VBA.

Не вдається розкрити аркуші в Excel - проблеми та шляхи вирішення

Якщо вам не вдається розкрити певні аркуші в Excel, наведені нижче поради щодо усунення несправностей можуть пролити світло на причини цього.

1. робоча книга захищена

Неможливо приховати або розкрити аркуші, якщо структура робочого зошита захищено (не плутати з шифруванням паролем на рівні книги або захистом робочого аркуша). Щоб перевірити це, перейдіть на сторінку Огляд вкладка> Зміни групу та ознайомитися з Захистити робочу книгу Якщо ця кнопка підсвічена зеленим кольором, то книга захищена. Щоб зняти захист, натисніть кнопку Захистити робочу книгу введіть пароль, якщо він буде запропонований, і збережіть книгу. Для отримання додаткової інформації див. розділ "Як розблокувати захищену книгу в Excel".

2. робочі аркуші дуже приховані

Якщо ваші робочі аркуші приховані кодом VBA, який робить їх дуже прихованими (присвоює xlSheetVeryHidden властивість), такі робочі аркуші не можуть бути відображені за допомогою властивості Роздягнутися Щоб розкрити дуже приховані аркуші, потрібно змінити властивість з xlSheetVeryHidden до xlSheetVisible з редактора Visual Basic або запустити цей код VBA.

3. у робочому зошиті немає прихованих аркушів

У разі, якщо Роздягнутися виділена сірим кольором як на стрічці, так і в контекстному меню правою кнопкою миші, а це означає, що у вашій книзі немає жодного прихованого аркуша :)

Ось так можна приховати аркуші в Excel. Якщо вам цікаво дізнатися, як приховати або показати інші об'єкти, такі як рядки, стовпці або формули, ви знайдете повну інформацію в наступних статтях. Дякую за прочитання і сподіваюся побачити вас на нашому блозі наступного тижня!

Доступні для завантаження

Макроси для приховування аркушів в Excel