Прескочи на основното съдържание

Как да преброим броя на листовете в работна книга?

Автор: Xiaoyang Последна промяна: 2022-01-20

Замисляли ли сте се как да преброите броя на работните листове в работната книга? Броенето им един по един е скучна работа, ако има много работни листове. Всъщност няма директна формула за изчисляване на броя на работните листове. Но тук мога да ви представя някои полезни и удобни трикове за справяне с този проблем.

Пребройте броя на листовете във функцията SHEETS на работна книга

Пребройте броя на листовете в работна книга с командата Дефиниране на име

Пребройте броя на листовете в работна книга с VBA код

Показване на броя листове в работна книга чрез навигационен екран добра идея3

Пребройте броя на листовете в работна книга, като създадете списък с листове добра идея3


стрелка син десен балонПребройте броя на листовете във функцията SHEETS на работна книга

Ако вашата версия на Excel е 2013 или по-нова, можете да използвате функцията SHEETS, за да получите общия брой листове на текущата работна книга.

Изберете празна клетка, след това въведете =ЛИСТОВЕ() в него, натиснете клавиша Enter, за да получите броя на листовете.


стрелка син десен балонПребройте броя на листовете в работна книга с командата Дефиниране на име

В Excel можете първо да приложите формула към функцията за дефиниране на име и след това да преброите броя на работните листове.

1. Стартирайте работната си книга, в която искате да преброите работните листове.

2. Щракнете Формула > Определете име, вижте екранна снимка:

doc-count-number-of-sheets1

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

doc-count-number-of-sheets1

4, След това кликнете OK за да затворите този диалогов прозорец и да се върнете към работния лист, след което въведете тази формула =COUNTA(ИНДЕКС(Брой Листове,0))(CountSheets в тази формула е името, което сте дефинирали в стъпка 3, можете да го промените според нуждите си.) в празна клетка, вижте екранната снимка:

doc-count-number-of-sheets1

5. И натиснете Въведете ключ, ще получите броя на вашите работни листове в текущата работна книга.

doc-count-number-of-sheets1


стрелка син десен балонПребройте броя на листовете в работна книга с 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 натиснете, за да изпълните този код, и ще се появи поле за подкана, за да ви каже общия брой работни листове, както е показано на следната екранна снимка:

doc-count-number-of-sheets1


стрелка син десен балон Показване на броя листове в работна книга с навигационен панел

Ако имате Kutools за Excel инсталиран, очевидно можете да видите броя на листовете в работна книга с навигация панел.

Kutools за Excel, с повече от 300 удобни функции, прави работата ви по-лесна. 

След безплатно инсталиране Kutools за Excel, моля, направете следното:

1. кликване Kutools > навигация за да активирате Поле за навигация вляво на работния лист. Вижте екранна снимка:
навигация на документи 1

2. След това кликнете Работна тетрадка и листове и след това можете да видите общия брой листове в активната работна книга, който се показва в долната част на панела, също така можете да видите броя на видимите и скритите листове на работната книга. Вижте екранна снимка:
навигация на документи 2

с навигация панел, можете да превключвате между листове, да показвате всички заглавки на колони, имена на диапазони и да добавяте автоматични текстове и т.н. Щракнете тук, за да научите повече подробности.

стрелка син десен балон Навигационен панел -- Избройте и пребройте всички листове


стрелка син десен балон Пребройте броя на листовете в работна книга, като създадете списък с листове

Ако смятате, че горните методи не са удобни, мога да ви представя заобиколен път.

Ако сте инсталирали Kutools за Excel, можете да създадете списък с имена на всички работни листове, след което да ги изберете за преброяване в лентата на състоянието.

След безплатно инсталиране Kutools за Excel, моля, направете следното:

1. Активирайте работната книга, чиито работни листове искате да брои, и щракнете Kutools плюс > Работен лист > Създайте списък с имена на листове. Вижте екранна снимка:
навигация на документи 1

2. След това в изскачащия диалогов прозорец поставете отметка Съдържа списък с хипервръзки опция и за удобно избиране на имена на листове можете да покажете индекса на листа в 3 или 4 колони. Вижте екранна снимка:
листове за броене на документи 2

3. кликване Ok, тогава се създава работен лист с имената на всички листове преди всички листове и вие просто трябва да изберете тези имена на листове и да видите резултата от преброяването на Статус баr.
doc kutools създава списък с имена на листове 3

Всъщност тези имена на листове могат да се свързват, можете да щракнете върху едно име на лист и след това бързо да се свържете към съответния лист. И със Създайте списък с имена на листове, можете да създадете свързващи бутони с имена на листове чрез проверка Съдържа бутони и макроси опция . Щракнете тук, за да научите повече за Създаване на списък с имена на листове.

стрелка син десен балон Създайте списък с имена на листове



Kutools за Excel: 300 + функции, които трябва да имате в Excel, 30-дневен безплатен пробен период от тук

добреНавигационен панел -- Търсене и замяна

Kutools за Excelе напреднал Търсене и заместване функция, може да ви помогне да намерите и
замяна на стойност в множество листове и работни книги.
doc намери и замени

Най-добрите инструменти за продуктивност в офиса

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

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
Comments (16)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
Thanks!
=Sheets() worked just fine!
Before I thought I must use VBA.
Saved a lot of trouble!
Rated 5 out of 5
This comment was minimized by the moderator on the site
Save the entire workbook in single pdf then u can find easily count the total no of pages.
This comment was minimized by the moderator on the site
I upgraded to Office 365 and now=COUNTA(INDEX(CountSheets,0)) always returns 1. Is there a fix for Excel 365 to get this to work?Thanks,
Jim...
This comment was minimized by the moderator on the site
=SHEETS() in Excel 365 returns 0.
=SHEETS(reference) - so what goes in "reference"?
This comment was minimized by the moderator on the site
Hi, gerland, in my office 365, the defined name method work as well. You can try the SHEETS function, I have updated it as the first one method in this tutorial.
This comment was minimized by the moderator on the site
=Sheets()  gives the answer. 
This comment was minimized by the moderator on the site
=sheets() works great
This comment was minimized by the moderator on the site
It Works only 2010 & Higher Version of Excel. Not Working In Excel 2007
This comment was minimized by the moderator on the site
Tried it on my 2007 version.
=COUNTA(countsheets)
works for me.
This comment was minimized by the moderator on the site
I like it. Thanks too much
This comment was minimized by the moderator on the site
Thank you so much for posting these directions!! I have a workbook with over 700 sheets and never knew there was a way for excel to count them for me. I used the first method and it worked absolutely perfectly!!
This comment was minimized by the moderator on the site
Great! Saved so much of my time!!
This comment was minimized by the moderator on the site
Hi, Thanks! This worked for me great in excel 2013 to count the number of sheets. Crazy that a formula is required to do this.
This comment was minimized by the moderator on the site
Sorry Freddy. Your first method using Formula > Define Name doesn't work. You got a typo somewhere or something
This comment was minimized by the moderator on the site
[quote]Sorry Freddy. Your first method using Formula > Define Name doesn't work. You got a typo somewhere or somethingBy smith[/quote] yes, instead of =COUNTA(INDEX(CountSheets,0)) You should write =COUNTA(INDEX(CountSheets;0))
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations