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

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

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

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

---

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

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

1. Нажмите Alt + F11 ключи для отображения Microsoft Visual Basic для приложений окно.

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. Нажмите Run или нажмите F5 клавиша для выполнения VBA И теперь отображаются только активные листы, остальные скрыты.

---

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

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

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

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

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

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

---