Как посчитать количество видимых листов в книге?

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

Подсчитайте количество видимых листов только с VBA

Подсчитайте количество видимых листов / скрытых листов / всех листов с помощью Kutools for Excel

---

Подсчитайте количество видимых листов только с VBA

В Excel, кроме подсчета видимых листов по одному, есть VBA, который поможет вам быстро подсчитать количество видимых листов.

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

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

2. Вставьте ниже код VBA в окно модуля.

VBA: подсчитать количество видимых листов книги

Sub VisibleSheetsCount()
'UpdatebyKutoolsforExcel20150909
    Dim xSht As Variant
    Dim I As Long
    For Each xSht In ActiveWorkbook.Sheets
        If xSht.Visible Then I = I + 1
    Next
    MsgBox I & " sheets are visible", , "Kutools for Excel"
End Sub

3. Нажмите Run нажмите кнопку, затем появится диалоговое окно, в котором будет указано количество видимых листов.

---

Подсчитайте количество видимых листов / скрытых листов / всех листов с помощью Kutools for Excel

Если вы не знакомы с VBA, вы можете использовать Kutools for ExcelАвтора Панель навигации для быстрого просмотра количества видимых листов, скрытых листов и всех листов.

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

1. Включите книгу, в которой нужно подсчитать количество видимых листов, и нажмите Кутулс > Навигация. Смотрите скриншот:

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

Если вы хотите скрыть панель навигации, просто нажмите Кутулс > Навигация чтобы скрыть это.

Kutools for ExcelАвтора Панель навигации является мощным, с его помощью вы можете просматривать список листов, список имен диапазонов, список заголовков столбцов, а также добавлять диапазоны, изображения, формулы в виде автоматических текстов, кроме того, вы можете найти и заменить слово на выбранных листах. Щелкните здесь, чтобы узнать больше о панели навигации.