Как быстро показать только активные или выбранные листы в Excel?

Если в вашей рабочей книге есть несколько листов, и вы хотите показать только активные или выбранные листы, скрыв остальные, как можно быстро это сделать, не скрывая их по одному вручную?

Показать только активный лист с помощью VBA

Показать только выбранные листы с помощью Kutools для Excel

Показать только активный лист с помощью VBA

Вот код VBA, который может быстро скрыть все листы, кроме активного.

1. Нажмите клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications.

2. Затем нажмите Вставить > Модуль и вставьте следующий код VBA в новое окно Модуля.

VBA: Показать только активный лист

Sub Macro1()
'UpdatebyKutoolsforExcel20160409
  Dim xSht As Object
  For Each xSht In ThisWorkbook.Sheets 
  If xSht.Name <> ThisWorkbook.ActiveSheet.Name 
  Then xSht.Visible = False
  Next
  End Sub

3. Нажмите кнопку Выполнить или клавишу F5, чтобы выполнить VBA. Теперь отображается только активный лист, остальные скрыты.

Показать только выбранные листы с помощью Kutools для Excel

Если у вас установлен Kutools для Excel, вы можете быстро скрыть неактивные листы или невыбранные листы одним щелчком мыши.

После бесплатной установки Kutools для Excel выполните следующие действия:

Активируйте лист или выберите листы, которые хотите показать, затем нажмите Kutools > Показать и скрыть > Скрыть неактивные листы. См. скриншот:

Теперь невыбранные листы скрыты.

Совет: Если вы хотите показать все листы, вы можете нажать Kutools > Показать и скрыть > Показать все листы. См. скриншот:

Связанные статьи

• Как скрыть строки на основе значения ячейки в Excel?
• Как создать динамический список имен листов в Excel?
• Как переименовать листы на основе значений ячеек в Excel?