Подсчёт количества листов в книге — полное руководство
В Excel отслеживание количества листов в книге играет ключевую роль при работе с крупными наборами данных или объединении отчётов из нескольких источников. Независимо от того, проверяете ли вы сложную книгу, структурируете данные или просто поддерживаете согласованность файлов, умение быстро подсчитать количество листов значительно повысит вашу продуктивность. В этом руководстве представлены различные методы подсчёта листов — от встроенных функций Excel и расширенных возможностей Kutools для Excel до использования определённых имён и пользовательского кода VBA — чтобы удовлетворить потребности и соответствовать уровню подготовки любого пользователя.

Подсчёт количества листов в книге с помощью функции ЛИСТЫ
Если у вас установлена версия Excel 2013 или новее, вы можете воспользоваться функцией ЛИСТЫ, чтобы быстро узнать общее количество листов в текущей книге.
Выберите пустую ячейку, введите в неё приведённую ниже формулу и нажмите клавишу Enter, чтобы получить количество листов.
=SHEETS() 
Легко отображайте количество листов в книге с помощью Kutools для Excel
Если установлен Kutools для Excel, вы можете в реальном времени легко просматривать количество листов в книге с помощью области НавигацияKutools.
После бесплатной установки Kutools для Excel перейдите на вкладку Kutools и выберите «Навигация» в группе Лента.
Общее количество листов в текущей книге отображается в нижней части области, где также можно увидеть число как видимых, так и скрытых листов.

- С помощью области Навигация вы можете переключаться между разными книгами и просматривать количество листов в каждой. Эта область также позволяет отображать все заголовки столбцов, имя ячейки, добавлять автоматические тексты и многое другое.Нажмите здесь, чтобы узнать подробнее.
- Чтобы использовать эту функцию, у вас на компьютере должно быть установлено приложение Kutools для Excel.Перейдите для загрузки Kutools для Excel, чтобы получить 30-дневную бесплатную пробную версию без ограничений.
Подсчёт количества листов в книге с помощью команды «Присвоить имя»
В Excel вы можете сначала использовать формулу в функции «Присвоить имя», а затем подсчитать количество листов.
1. Откройте книгу, в которой нужно подсчитать количество листов.
2. Нажмите Формулы > Присвоить имя, см. снимок экрана:

3. В диалоговом окне Новое имя укажите имя в поле Имя, а затем введите формулу =GET.WORKBOOK(1)&T(NOW()) в поле Диапазон. См. снимок экрана:

4. Затем нажмите ОК, чтобы закрыть это диалоговое окно и вернуться на лист, после чего введите формулу =COUNTA(INDEX(CountSheets,0))(где)CountSheets — имя, заданное на шаге 3; при необходимости его можно изменить) в пустую ячейку. См. снимок экрана:

5. Нажмите клавишу Enter, и вы увидите количество листов в книге «Текущая книга».

Подсчёт количества листов в книге с помощью кода VBA
Если вам кажется, что приведённые выше формулы сложно запомнить, вот простой код VBA, который тоже придёт вам на помощь.
1. Удерживая клавиши ALT + F11, откройте окно Microsoft Visual Basic для приложений.
2. Нажмите Вставка > Модуль и вставьте следующий код в окно Модуль.
Код VBA: Подсчёт количества листов в книге
Public Sub CountWorkSheets()
'Update 20140326
MsgBox "The total number sheets of this workbook: " & Application.Sheets.Count
End Sub
3. Затем нажмите клавишу F5, чтобы выполнить этот код — появится окно с сообщением об общем количестве листов, как показано на следующем снимке экрана:

Применяя эти методы, вы оптимизируете рабочий процесс, сократите количество ошибок и получите лучший контроль над своей табличной средой. Независимо от того, выберете ли вы простую функцию, инструмент вроде Kutools или погрузитесь в написание сценариев VBA, каждый подход предлагает ценные решения, идеально соответствующие вашим конкретным задачам. А если вы стремитесь раскрыть весь потенциал Excel, на нашем сайте вас ждёт множество обучающих материалов.Узнайте больше советов и приёмов работы в Excel здесь.
Навигация — список и подсчёт всех листов
Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек