Перейти к основному содержанию

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

Вы когда-нибудь пытались подсчитать количество листов, название которых начинается с определенного слова или содержит конкретное слово? Например, подсчитайте количество рабочих листов, имена которых начинаются с или содержат «KTE». Эта статья предоставит метод, который поможет вам выявить проблему.

Подсчет листов с определенным именем с кодом VBA
Быстро найти все листы, содержащие определенное слово в названии листа


Подсчет листов с определенным именем с кодом VBA

Следующие коды VBA помогают подсчитать количество листов с определенным именем в книге. Пожалуйста, сделайте следующее.

1. нажмите другой + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.

2. в Microsoft Visual Basic для приложений окна, нажмите Вставить > Модули, затем скопируйте ниже код VBA в окно кода.

Код VBA 1: Подсчет листов, имена которых начинаются с «KTE»

Sub CountWSNames()
    Dim I As Long
    Dim xCount As Integer
    For I = 1 To ActiveWorkbook.Sheets.Count
        If Mid(Sheets(I).Name, 1, 3) = "KTE" Then xCount = xCount + 1
    Next
    MsgBox "There are " & CStr(xCount) & " sheets that start with 'KTE'", vbOKOnly, "KuTools for Excel"
End Sub

Если вы хотите подсчитать количество листов, содержащих «KTE», примените код VBA ниже 2.

Код VBA 2: Подсчет листов, имя которых содержит «KTE»

Sub CountWSNames()
    Dim I As Long
    Dim xCount As Integer
    For I = 1 To ActiveWorkbook.Sheets.Count
        If InStr(1, Sheets(I).Name, "KTE") > 0 Then xCount = xCount + 1
    Next
    MsgBox "There are " & CStr(xCount) & " sheets that with 'KTE'", vbOKOnly, "KuTools for Excel"
End Sub

Внимание: Пожалуйста, замените слово «KTE» на то, на котором вам нужно подсчитать количество рабочих листов.

3. нажмите F5 ключ для запуска кода. Затем появится диалоговое окно, в котором сообщается, сколько листов в текущей книге начинается с «KTE» или содержит «KTE». Смотрите скриншоты:

Количество рабочих листов, название которых начинается с «KTE»:

Количество рабочих листов, в названии которых есть «KTE»:


Быстро найти все листы, содержащие определенное слово в названии листа.

В этом разделе вы узнаете, как быстро найти все листы, содержащие определенное слово в имени листа, с помощью Kutools for Excel.

Kutools for Excel : с более чем 300 удобными надстройками Excel, бесплатно без ограничений в течение 30 дней.

1. После установки Kutools for Excel, Kutools ' Навигация панель откроется автоматически в левой части книги. Или вы можете включить панель, нажав Кутулс > Навигация как показано ниже.

2. в Рабочая тетрадь и лист раздел панели навигации, проверьте ФИЛЬТР поле и введите конкретное имя рабочего листа, на котором вы хотите найти рабочие листы. Затем все листы, имя которых содержит определенное слово, фильтруются и отображаются в поле списка рабочего листа. Смотрите скриншот:

  Если вы хотите получить бесплатную (30-дневную) пробную версию этой утилиты, пожалуйста, нажмите, чтобы загрузить это, а затем перейдите к применению операции в соответствии с указанными выше шагами.


Статьи по теме:

Лучшие инструменты для офисной работы

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

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

Описание


Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations