KutoolsforOffice — Одно решение — пять мощных инструментов.Меньше усилий — больше результата.

Подсчёт количества листов в книге — полное руководство

АвторСяоянДата изменения

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

Подсчитать количество листов


Подсчёт количества листов в книге с помощью функции ЛИСТЫ

Если у вас установлена версия Excel 2013 или новее, вы можете воспользоваться функцией ЛИСТЫ, чтобы быстро узнать общее количество листов в текущей книге.

Выберите пустую ячейку, введите в неё приведённую ниже формулу и нажмите клавишу Enter, чтобы получить количество листов.

=SHEETS()

 получить количество листов с помощью функции SHEETS


Легко отображайте количество листов в книге с помощью Kutools для Excel

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

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

После бесплатной установки Kutools для Excel перейдите на вкладку Kutools и выберите «Навигация» в группе Лента.

Общее количество листов в текущей книге отображается в нижней части области, где также можно увидеть число как видимых, так и скрытых листов.

количество рабочих листов отображается в нижней части панели

Примечания:

Подсчёт количества листов в книге с помощью команды «Присвоить имя»

В Excel вы можете сначала использовать формулу в функции «Присвоить имя», а затем подсчитать количество листов.

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

2. Нажмите Формулы > Присвоить имя, см. снимок экрана:

Выберите Формулы > Определить имя

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

укажите параметры в диалоговом окне

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

введите формулу в ячейку

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

нажмите клавишу 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

🤖KUTOOLS AI Помощник: Преобразуйте Анализ данных с помощью:Интеллектуального выполнения   |  Генерации кода|  Создания пользовательские формулы  |  Анализа данных и построения диаграмм|  Вызова Расширенные функции
Популярные функции:Поиск, выделение или Отметить дубликаты   |  Удалить пустые строки   |  Объединить столбцы или ячеек без потери данных   |  Округление без использования формул
Супер ПОИСК:VLookup по нескольким критериям  |  VLookup по нескольким значениям  |   VLookup по нескольким листам   |   Распознавание нечетких соответствий
Расширенный раскрывающийся список:Быстрое создание выпадающего списка   |  Зависимый выпадающий список   |  Выпадающий список с множественным выбором
Управление столбцами:Добавление заданного количества столбцов|Перемещение столбцов|Переключение видимости скрытых столбцов|Сравнение диапазонов и столбцов
Избранные функции:Сетка фокусировки   |  Просмотр дизайна   |Улучшенная строка формулы   | Управление рабочими книгами и листами   |  Библиотека ресурсов(автотекст)|  Выбор даты   |  Объединить листы  |  Шифрование/Расшифровать ячейки   | Отправка писем по списку   |  Супер фильтр   |   Специальный фильтр(Фильтр ячеек с жирным шрифтом/курсив/зачёркивание…) …
Лучшие наборы инструментов 15:12 Текстовыеинструменты(Добавить текст,Удалить определенные символы, …)|   50+Типыдиаграмм(Диаграмма Ганта, …)|   40+ Практические формулы(Рассчитать возраст на основе даты рождения, …)|   19 Инструментывставки(Вставить QR-код,Вставка изображения по пути, …)|   12 Инструментыпреобразования(Преобразовать в слова,Конвертация валют, …)|   7 Объединить и разделитьИнструменты(Расширенное объединение строк,Разделить ячейки, …)|… и многое другое
Используйте Kutools на предпочитаемом языке — поддержка английского, испанского, немецкого, французского, китайского и ещё 40+ языков!

Раскройте весь потенциал 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.

ExcelWordOutlookTabsPowerPoint
  • Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
  • Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
  • Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
  • 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
  • Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек