Как переключаться между скрытыми и видимыми листами в Excel?

Предположим, у вас есть листы с важными данными, которые вы не хотите показывать другим. Скрытие листов может быть простым способом защиты данных в Excel. Однако иногда вам нужно показать скрытые листы, а затем снова их скрыть. Обычно вам придется отображать их по одному, и если вы часто выполняете эту операцию, это может быть утомительно и отнимать много времени. В этой статье я представлю вам несколько быстрых способов переключения листов между скрытым и видимым состоянием.

Переключение листов между скрытым и видимым состоянием с помощью кода VBA

Переключение листов между скрытым и видимым состоянием с помощью Kutools для Excel

Переключение листов между скрытым и видимым состоянием с помощью кода VBA

Предположим, у вас есть книга, где Sheet1, Sheet2 и Sheet3 скрыты. Следующий код VBA поможет вам быстро отобразить их, а при втором нажатии они снова будут скрыты. Пожалуйста, выполните следующие действия:

1. Нажмите Разработчик > Visual Basic, и откроется новое окно Microsoft Visual Basic для приложений. Нажмите Вставить > Модуль, затем введите следующий код в модуль.

Sub ToggleHideUnhideDataSheets()
Application.ScreenUpdating = False
Dim wb As Workbook
Dim ShtNames() As Variant
Set wb = ActiveWorkbook
ShtNames = Array("Sheet1", "Sheet2", "Sheet3")
For i = 0 To UBound(ShtNames)
wb.Sheets(ShtNames(i)).Visible = Not wb.Sheets(ShtNames(i)).Visible
Next i
Application.ScreenUpdating = True
End Sub

В приведенном выше коде ShtNames = Array("Sheet1", "Sheet2", "Sheet3") является переменной, вы можете изменить имена скрытых листов по своему усмотрению.

2. Затем нажмите клавишу F5, чтобы запустить код, и скрытые листы будут отображены. Если вы хотите снова скрыть их, нажмите клавишу F5 еще раз.

Переключение листов между скрытым и видимым состоянием с помощью Kutools для Excel

С помощью функции Переключить видимость листов из Kutools для Excel вы можете легко переключать листы между скрытым и видимым состоянием, нажимая команду Листы.

Kutools для Excel включает более 300 удобных инструментов для Excel. Бесплатная пробная версия без ограничений на 30 дней. Получите его сейчас.

После установки Kutools для Excel вы можете выполнить следующие шаги:

1. Откройте книгу, которая должна содержать некоторые скрытые листы.

2. Нажмите Kutools > Вид > Переключить видимость листов, см. скриншот:

Когда вы нажмете эту команду один раз, все скрытые листы будут отображены. Если вы хотите снова скрыть их, нажмите эту команду второй раз. Смотрите скриншоты:

Примечание: Эта функция также применима к несмежным скрытым листам.

Связанная статья:

Переключение между скрытыми и видимыми столбцами в Excel