показать несколько или все скрытые листы
В этом руководстве объясняется, как отобразить рабочие листы в Excel 2016, 2013, 2010 и более ранних версиях. Вы узнаете, как быстро отобразить рабочий лист, щелкнув правой кнопкой мыши, и как отобразить все листы одновременно с помощью кода VBA.
Представьте себе: вы открываете рабочий лист и замечаете, что некоторые формулы ссылаются на другой рабочий лист. Вы смотрите на вкладки листов, но таблицы, на которую ссылаетесь, там нет! Вы пытаетесь создать новый лист с тем же именем, но Excel сообщает, что он уже существует. Что все это значит? Просто рабочий лист скрыт. Как просмотреть скрытые листы в Excel? Очевидно, вы должны показать их. Это можно сделать вручную с помощью программы Excel. Показать командой или автоматически с помощью VBA. Этот урок научит вас обоим методам.
Как отобразить листы в Excel
Если вы хотите увидеть только один или два скрытых листа, вот как вы можете быстро их отобразить:
- В книге Excel щелкните правой кнопкой мыши любую вкладку листа и выберите «Показать…» в контекстном меню.
- в Показать выберите скрытый лист, который хотите отобразить, и нажмите ХОРОШО (или дважды щелкните имя листа). Сделанный!
Помимо контекстного меню правой кнопки мыши, Показать диалоговое окно можно открыть с ленты:
- В Excel 2003 и более ранних версиях щелкните значок Формат меню, а затем щелкните Лист > Показать.
- В Excel 2016, Excel 2013, Excel 2010 и Excel 2007 перейдите к Дом вкладка > Клетки группу и нажмите кнопку Формат Под Видимостьуказать на Скрыть и показатьа затем нажмите «Показать лист…».
Примечание. Эксель Показать Опция позволяет выбирать только один лист за раз. Чтобы отобразить несколько листов, вам придется повторить вышеуказанные шаги для каждого рабочего листа отдельно, или вы можете отобразить все листы за один раз, используя приведенные ниже макросы.
Как отобразить листы в Excel с помощью VBA
В ситуациях, когда у вас есть несколько скрытых рабочих листов, отображение их по одному может занять очень много времени, особенно если вы хотите отобразить все листы в своей книге. К счастью, вы можете автоматизировать этот процесс с помощью одного из следующих макросов.
Как отобразить все листы в Excel
Этот небольшой макрос делает все скрытые листы в активной книге видимыми сразу, не беспокоя вас никакими уведомлениями.
Sub Unhide_All_Sheets () Dim wks As Worksheet для каждой wks в ActiveWorkbook.Worksheets wks.Visible = xlSheetVisible Next wks End Sub
Показать все скрытые листы и показать их количество
Как и предыдущий, этот макрос также отображает все скрытые листы в книге. Разница в том, что по завершении он показывает диалоговое окно, информирующее пользователя о том, сколько листов было открыто:
Sub Unhide_All_Sheets_Count() Dim wks As Worksheet Dim count As Integer count = 0 Для каждой wks In ActiveWorkbook.Worksheets If wks.Visible <> xlSheetVisible Then wks.Visible = xlSheetVisible count = count + 1 End If Next wks If count > 0 Then MsgBox подсчет &ампер; “Рабочие листы были отображены.”, vbOKOnly, “Показ рабочих листов” Else MsgBox “Скрытые рабочие листы не найдены.”, vbOKOnly, “Отображение скрытых рабочих листов” End If End Sub
Показать несколько выбранных листов
Если вы предпочитаете не отображать все рабочие листы сразу, а только те, которые пользователь явным образом соглашается сделать видимыми, макрос должен запрашивать каждый скрытый лист отдельно, например:
Sub Unhide_Selected_Sheets() Dim wks As Worksheet Dim MsgResult As VbMsgBoxResult Для каждого wks в 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 Для каждой wks в ActiveWorkbook.Worksheets If (wks.Visible <> xlSheetVisible) And (InStr(wks.Name, “report”) > 0) Then wks.Visible = xlSheetVisible count = count + 1 End If Next wks Если count > 0, то MsgBox count & ” рабочие листы были отображены.”, vbOKOnly, “Показ рабочих листов” Else MsgBox “Скрытых рабочих листов с указанным именем не найдено.”, vbOKOnly, “Отображение скрытых рабочих листов” End If End Sub
Как использовать макросы для отображения листов в Excel
Чтобы использовать макросы на своем листе, вы можете либо скопировать/вставить код в редакторе Visual Basic, либо загрузить книгу с макросами и запустить их оттуда.
Как вставить макрос в книгу
Вы можете добавить любой из вышеперечисленных макросов в свою книгу следующим образом:
- Откройте книгу со скрытыми листами.
- Нажмите Alt + F11, чтобы открыть редактор Visual Basic.
- На левой панели щелкните правой кнопкой мыши Эта рабочая тетрадь и выберите Вставлять > Модуль из контекстного меню.
- Вставьте код в окно кода.
- Нажмите F5, чтобы запустить макрос.
Подробные пошаговые инструкции см. в разделе Как вставить и запустить код VBA в Excel.
Скачать книгу с макросами
Кроме того, вы можете загрузить наш образец рабочей тетради на показать листы в Excel который содержит все макросы, обсуждаемые в этом руководстве:
- Показать_все_листы – мгновенно и бесшумно отображать все рабочие листы в активной книге.
- Unhide_All_Sheets_Count – показать все скрытые листы вместе с их количеством.
- Показать_Выбранные_Листы – отображать скрытые листы, которые вы решили показать.
- Unhide_Sheets_Contain – отображать рабочие листы, имена которых содержат определенное слово или текст.
Чтобы запустить макросы в Excel, выполните следующие действия:
- Откройте загруженную книгу и включите макросы, если будет предложено.
- Откройте собственную книгу, в которой вы хотите увидеть скрытые листы.
- В книге нажмите Alt + F8, выберите нужный макрос и нажмите «Выполнить».
Например, чтобы отобразить все листы в файле Excel и отобразить количество скрытых листов, запустите этот макрос:
Как показать скрытые листы в Excel, создав собственное представление
Помимо макросов, утомительное отображение скрытых рабочих листов по одному можно преодолеть, создав собственное представление. Если вы не знакомы с этой функцией Excel, вы можете думать о пользовательском представлении как о снимке настроек вашей книги, который можно применить в любой момент одним щелчком мыши. Этот метод лучше всего использовать в самом начале работы, когда ни один из листов еще не скрыт.
Итак, что мы собираемся сделать сейчас, это создать Показать все листы пользовательский вид. Вот как:
- Убедитесь, что все электронные таблицы в вашей книге видны. Этот совет показывает, как быстро проверить книгу на наличие скрытых листов.
- Перейти к Вид вкладка > Просмотры рабочей книги группу и нажмите кнопку Пользовательские представления.
- Пользовательский вид появится диалоговое окно, и вы нажмете Добавить…
- в Добавить вид диалоговое окно, введите имя для своего пользовательского представления, например Показать все листыи нажмите ОК.
Теперь вы можете скрыть столько рабочих листов, сколько хотите, а когда вы хотите снова сделать их видимыми, вы нажимаете кнопку Пользовательские представления кнопку, выберите Показать все листы посмотреть и нажать Показыватьили просто дважды щелкните представление.
Вот и все! Все скрытые листы будут показаны немедленно.
Как проверить, содержит ли книга скрытые листы
Самый быстрый способ обнаружить скрытые листы в Excel: щелкните правой кнопкой мыши вкладку любого листа и посмотрите, Скрывать… команда включена или нет. Если он включен, щелкните его и посмотрите, какие листы скрыты. Если он отключен (выделен серым цветом), рабочая книга не содержит скрытых листов.
Примечание. Этот метод не показывает очень скрытые листы. Единственный способ просмотреть такие листы — отобразить их с помощью VBA.
Не удается отобразить листы в Excel — проблемы и решения
Если вы не можете отобразить определенные листы в Excel, следующие советы по устранению неполадок могут пролить свет на то, почему.
1. Книга защищена
Невозможно скрыть или отобразить листы, если структура рабочей книги защищена (не следует путать с шифрованием паролем на уровне рабочей книги или защитой рабочего листа). Чтобы проверить это, перейдите на Обзор вкладка > Изменения group и посмотрите на кнопку «Защитить книгу». Если эта кнопка выделена зеленым цветом, книга защищена. Чтобы снять защиту, нажмите кнопку Защитить книгу кнопку, введите пароль, если будет предложено, и сохраните книгу. Дополнительные сведения см. в разделе Как разблокировать защищенную книгу в Excel.
2. Рабочие листы очень скрыты
Если ваши рабочие листы скрыты кодом VBA, это делает их очень скрытыми (назначает кслшитверихидден свойство), такие рабочие листы не могут быть отображены с помощью Показать команда. Чтобы отобразить очень скрытые листы, вам нужно изменить свойство с кслшитверихидден к кслшитвисибле из редактора Visual Basic или запустите этот код VBA.
3. В книге нет скрытых листов
Если Показать Команда недоступна как на ленте, так и в контекстном меню, это означает, что в вашей книге нет ни одного скрытого листа 🙂
Вот как вы показываете листы в Excel. Если вам интересно узнать, как скрыть или отобразить другие объекты, такие как строки, столбцы или формулы, вы найдете полную информацию в следующих статьях. Я благодарю вас за чтение и надеюсь увидеть вас в нашем блоге на следующей неделе!
Доступные загрузки
Макросы для отображения листов в Excel
