Как посчитать все листы в книге excel

На чтение 5 мин Опубликовано 26.01.2021

Листам в книгах Excel можно дать имена, соответствующие содержимому. Из них было бы удобно составить оглавление, но не все знают, как это сделать. Существуют несложные способы сформировать список листов и методы, требующие усилий, например установки сторонних дополнений. С помощью инструментов Excel пользователи также могут подсчитать количество листов в крупной книге. Выясним, как получить оглавление для чтения или перехода к каждому листу, какими формулами для этого нужно воспользоваться.

Содержание

  1. Список листов с помощью формулы
  2. Как составить список листов через VBA
  3. Надстройки для составления списка листов
  4. Как подсчитать количество листов в книге

Список листов с помощью формулы

Этот способ основан на использовании функции, которую нельзя найти в Менеджере. Она связана с макросами Excel 4.0. Чтобы применить формулу на практике, необходимо пройти дополнительный шаг, редко встречающийся в работе с функциями – зайти в диспетчер имен и добавить туда выражение.

  1. Переходим на вкладку «Формулы» и кликаем по кнопке «Диспетчер имен». Опция находится в разделе «Определенные имена».

Как получить список листов книги Excel

  1. Нажимаем «Создать» в открывшемся диалоговом окне.

Как получить список листов книги Excel

  1. Записываем новое имя в верхнем поле, выбираем область «Книга» (обычно она установлена по умолчанию) и записываем в графу «Диапазон» эту формулу: =ЗАМЕНИТЬ(ПОЛУЧИТЬ.РАБОЧУЮ.КНИГУ(1);1; НАЙТИ(«]»;ПОЛУЧИТЬ.РАБОЧУЮ.КНИГУ(1));»»)
  2. После заполнения всех полей жмем «ОК». В книге Excel пока ничего не изменится, но эти шаги помогут в будущем. Окно диспетчера имен можно закрыть.

Как получить список листов книги Excel

  1. Открываем лист, где будет расположен список. Выбираем ячейку и записываем в ней формулу с только что созданным именем: =ИНДЕКС(Список_листов;СТРОКА()). Нажмите Enter, и в ячейке появится название первого листа.

Как получить список листов книги Excel

  1. Необходимо вывести все названия листов в столбец. Для этого зажимаем маркер заполнения, который находится в правом нижнем углу выбранной ячейки, и выделяем нужное количество ячеек. В таблице-примере 4 листа столько и было выделено ячеек.

Как получить список листов книги Excel

  1. Создадим список, из которого можно перейти на каждый лист. Выберите другую пустую ячейку и вставьте эту формулу: =ГИПЕРССЫЛКА(«#»&A1&»!A1″;»»&A1).

Обратите внимание! Ячейка A1 прописывается в формуле, чтобы пользователи могли перейти на конкретную ячейку каждого листа. После нажатия Enter появится кликабельное название листа.

Как получить список листов книги Excel

  1. Полный список с гиперссылками можно создать так же, с помощью маркера заполнения.
  2. Если название листа изменено, придется перезаполнить списки – для этого нужно просто удалить их, снова вставить те же формулы и выделить ячейки ниже.

Важно! Невозможно сделать ссылку на лист с диаграммой в Excel. На экране появляется сообщение об ошибке, переход не происходит.

Как составить список листов через VBA

Существует другой способ составления списка листов из книги – можно подключить пользовательскую функцию через редактор Visual Basic. Такой метод может показаться сложным, но это не так, если воспользоваться шаблоном для добавления функции в программу.

  1. Открываем VBA с помощью комбинации клавиш «Alt+F11». Если при нажатии F11 снижается яркость или срабатывает другая функция, установленная на эту кнопку, зажмите клавишу Fn.
  2. Нажмите «Вставить» (Insert) на верхней панели и выберите в открывшемся меню пункт «Модуль» (Module).

Как получить список листов книги Excel

  1. Вставляем в свободное поле этот текст:

Function SheetList(N As Integer)

SheetList = ActiveWorkbook.Worksheets(N).Name

End Function

  1. Далее можно закрыть окно Visual Basic, потому что этот инструмент больше не понадобится, а функция уже добавлена в программу.

Как получить список листов книги Excel

  1. Открываем лист для списка и вводим формулу в начальную ячейку. Теперь не нужно длинное выражение, чтобы создать список листов. Новая формула выглядит так: =SheetList(СТРОКА()).
  2. Нажимаем Enter и получаем название листа в ячейке. Маркером заполнения создаем список.

Как получить список листов книги Excel

  1. Для гиперссылок придется использовать ту же длинную формулу: =ГИПЕРССЫЛКА(«#»&A1&»!A1″;»»&A1).

Надстройки для составления списка листов

Надстройки – это дополнения для Microsoft Excel, которые создаются продвинутыми пользователями. Компания Microsoft рассказывает на официальном сайте о возможности подключить надстройки, но не предлагает скачать дополнения, поэтому обычно их загружают из других источников.

Всегда проверяйте загрузки на вредоносные элементы с помощью антивирусной программы.

Существуют платные и бесплатные надстройки. Сегодня рассмотрим набор дополнений для Excel 2007-2019 под названием «Ёxcel». Разработчик распространяет файл на своем сайте за добровольное пожертвование. Установите надстройку по инструкции – после этого можно приступать к составлению списка.

  1. Открываем лист, где будет размещен список, и нажимаем левой кнопкой мыши на начальную ячейку будущего перечисления.
  2. На вкладке надстройки находим кнопку «Листы». Кликаем по ней, чтобы открылось меню, и выбираем пункт «Получить список листов книги». Скриншот создателя надстройки:

Как получить список листов книги Excel

  1. Выбираем, какие листы показать в списке. Для простейшего перечисления названий листов кликаем по пункту «Простой список» и жмем на кнопку с галочкой в левом нижнем углу диалогового окна.
  2. На экране появится список листов. Если выставить настройки сложнее, то внешний вид списка немного изменится.

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

Иногда в книгах Excel появляется много листов, например если документ относится к крупному проекту. Выяснить, сколько в файле страниц, можно с помощью функции ЛИСТЫ.

Обратите внимание! Функция работает только в версиях Microsoft Excel от 2013.

  1. Выбираем пустую ячейку и записываем в ней формулу: =ЛИСТЫ(). Не обязательно заполнять аргумент «Ссылка», если нужно посчитать листы в одной книге.
  1. Жмем Enter и получаем числовое значение.

Как получить список листов книги Excel

Если все листы переименованы, и нужно узнать их номера, воспользуйтесь функцией ЛИСТ. Эта формула также доступна с 2013-й версии. У функции ЛИСТ один аргумент – «Значение». Если аргумент не заполнен, после нажатия клавиши Enter в ячейке появится номер того же листа, где была введена формула. Простое выражение с ЛИСТ выглядит так: =ЛИСТ().

Оцените качество статьи. Нам важно ваше мнение:

Excel для Microsoft 365 Excel для Microsoft 365 для Mac Excel для Интернета Excel 2021 Excel 2021 для Mac Excel 2019 Excel 2019 для Mac Excel 2016 Excel 2016 для Mac Excel 2013 Еще…Меньше

В этой статье описаны синтаксис формулы и использование листов
 в Microsoft Excel.

Описание

Возвращает количество листов в ссылке.

Синтаксис

ЛИСТЫ(ссылка)

Аргументы функции ЛИСТЫ описаны ниже.

  • Ссылка    Необязательный аргумент. Ссылка — это ссылка, для которой необходимо знать количество листов. Если опустить аргумент «Ссылка», функция ЛИСТЫ возвращает количество листов в книге, которая содержит функцию.

Замечания

  • Функция ЛИСТЫ включает в себя все листы (видимые, скрытые или очень скрытые), кроме всех остальных типов листов (макросов, диаграмм или диалогов).

  • Если ссылка не является допустимым значением, то листы возвращают значение #REF! (значение ошибки).

  • Функция ЛИСТЫ недоступна в объектной модели (OM), поскольку там уже содержится похожая функция.

Пример

Скопируйте образец данных из следующей таблицы и вставьте их в ячейку A1 нового листа Excel. Чтобы отобразить результаты формул, выделите их и нажмите клавишу F2, а затем — клавишу Enter. При необходимости измените ширину столбцов, чтобы видеть все данные.

Формула

Описание

Результат

=ЛИСТЫ()

Так как не указан аргумент «Ссылка», возвращается общее количество листов в книге (3).

3

=ЛИСТЫ(Мои3DСсылки)

Возвращает количество листов в ссылке 3D «Мои3DСсылки», которая включает Лист2 и Лист3 (2).

2

К началу страницы

Нужна дополнительная помощь?

 

Diana

Пользователь

Сообщений: 982
Регистрация: 28.12.2012

Доброго времени суток всем на форуме!  
маленький вопросик на ночь, чтобы крепче спалось :)  
искала по всему форуму и интернету, но так и не нашла.  

  вопрос: как определить количество листов в книге?  
например, чтобы в cells(1,1) написалось количество листов текущей книги.  

  понимаю, что нужно использовать Worksheets.Count, но что я с ним только не творила, не вышло… прошу помощи :)  

  спасибочки всем-всем!  

  -88232-

 

А чего с ним творить?  
Число обычных листов  
cells(1,1)=worksheets.Count    

  Число всех листов включая диаграммы и пр.  
cells(1,1)=sheets.Count

 

KuklP

Пользователь

Сообщений: 14868
Регистрация: 21.12.2012

E-mail и реквизиты в профиле.

Чего это?  
Public Sub www()  
[a1] = ThisWorkbook.Worksheets.Count
End Sub  
В активный лист вставит…

Я сам — дурнее всякого примера! …

 

Diana

Пользователь

Сообщений: 982
Регистрация: 28.12.2012

хм… вот так все просто да…  
а я мучилась почти три часа! :)  
Спасибочки Сергей и неизвестный автор!!! :)

 

KuklP

Пользователь

Сообщений: 14868
Регистрация: 21.12.2012

E-mail и реквизиты в профиле.

Баиньки, Дайана. Хороших снов.

Я сам — дурнее всякого примера! …

 

5 сек. я же не засну, пока Диана не скажет, кто на её аватарке? (если она уже говорила, то прошу меня простить, видно я пропустил этот момент) )

 

Юрий М

Модератор

Сообщений: 60585
Регистрация: 14.09.2012

Контакты см. в профиле

 

{quote}{login=}{date=24.10.2010 11:57}{thema=}{post}5 сек. я же не засну, пока Диана не скажет, кто на её аватарке? (если она уже говорила, то прошу меня простить, видно я пропустил этот момент) ){/post}{/quote}  

    …… и тут Остапа понесло………

 

Классно рисует ))    

  P.S. Эта аватарка мне намного больше нравится, чем предыдущая ))

 

эх, даже порадоваться за Диану не дадут (((  Злые Вы.. уйду я от .. спать ))  

  Спокойной ночки, Дианочка …

 

Diana

Пользователь

Сообщений: 982
Регистрация: 28.12.2012

сладких снов, молодые люди! и спасибо за помощь :)  
а на фото я :) как и на предыдущей :)

 

Чувствую нужно получать Немецкую визу…

 

Guest

Гость

#13

25.10.2010 13:18:26

Диана, на вкладке ССЫЛКИ есть такая —

http://msoffice.nm.ru/faq/macros.htm  

——-  
Сайт Павла Юрьевича Климова, практически полностью посвященный Excel. Обширный FAQ, множество примеров, доступных для бесплатного скачивания, несколько пользовательских функций VBA — есть что посмотреть!  
———  
Очень помогает, там такие кирпичики в здание решения:)  
По совету с форума там часто провожу время при поиске решений;)  
Игорь67

Как посчитать количество листов в рабочей тетради?

Вы когда-нибудь задумывались, как подсчитать количество листов в книге? Считать их по одному — скучная работа, если листов много. На самом деле нет прямой формулы для расчета количества рабочих листов. Но здесь я могу представить вам несколько полезных и удобных приемов для решения этой проблемы.

Подсчитайте количество листов в книге Функция ЛИСТЫ

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

Подсчитайте количество листов в книге с кодом VBA

Отображение количества листов в книге с помощью области навигации хорошая идея3

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


стрелка синий правый пузырьПодсчитайте количество листов в книге Функция ЛИСТЫ

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

Выберите пустую ячейку, затем введите =ЛИСТЫ() в него, нажмите клавишу Enter, чтобы получить количество листов.


стрелка синий правый пузырьПодсчитайте количество листов в книге с помощью команды Определить имя

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

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

2. Нажмите Формула > Определить имя, см. снимок экрана:

количество-документов-листов1

3. И в Новое имя диалоговом окне укажите имя в поле Имя и фамилия текстовое поле, а затем введите эту формулу = ПОЛУЧИТЬ.РАБОТУ (1) & T (СЕЙЧАС ()) до Относится к текстовое поле, см. снимок экрана:

количество-документов-листов1

4. Затем нажмите OK чтобы закрыть это диалоговое окно и вернуться на рабочий лист, введите эту формулу = СЧЁТ (ИНДЕКС (Таблицы; 0))(CountSheets в этой формуле — это имя, которое вы определили на шаге 3, вы можете изменить его по своему усмотрению.) в пустую ячейку, см. снимок экрана:

количество-документов-листов1

5. И нажмите Enter key, вы получите количество ваших листов в текущей книге.

количество-документов-листов1


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

количество-документов-листов1


стрелка синий правый пузырь Показать количество листов в книге с помощью области навигации

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

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

1. Нажмите Кутулс > Навигация для Панель навигации в левой части рабочего листа. Смотрите скриншот:
doc навигация 1

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

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

стрелка синий правый пузырь Панель навигации — Список и подсчет всех листов


стрелка синий правый пузырь Подсчитайте количество листов в книге, создав список листов

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

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

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

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

2. Затем в появившемся диалоговом окне отметьте Содержит список гиперссылок вариант, а для удобного выбора имен листов вы можете отобразить индекс листа в 3 или 4 столбца. Смотрите скриншот:
количество листов 2

3. Нажмите Ok, то создается рабочий лист со всеми именами листов перед всеми листами, и вам просто нужно выбрать эти имена листов и просмотреть результат подсчета в Статус bar.
doc kutools создать список имен листов 3

Фактически, эти имена листов можно связать, вы можете щелкнуть одно имя листа, а затем быстро установить ссылку на соответствующий лист. И с Создать список имен листов, вы можете создавать связанные кнопки имен листов, проверяя Содержит кнопки и макросы вариант. Щелкните здесь, чтобы узнать больше о создании списка имен листов.

стрелка синий правый пузырь Создать список имен листов


док найти и заменить


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

Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%

  • Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
  • Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон
  • Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны
  • Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
  • Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии
  • Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
  • Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF
  • Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.

вкладка kte 201905


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

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!

офисный дно

Подсчитать кол-во листов в экселе(через формулу)

frukti4ek

Дата: Вторник, 23.04.2013, 16:02 |
Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 117

Добрый день! подскажите пожалуйста, как посчитать кол-во листов в экселе, если к примеру находишься на на 3-м листе, счет должен начинаться с 3 по n-ое число слева направо.
Может есть какая то формула по подсчету значений в какой то ячейке и все!!
Спасибо!

 

Ответить

Serge_007

Дата: Вторник, 23.04.2013, 16:26 |
Сообщение № 2

Группа: Админы

Ранг: Местный житель

Сообщений: 15894


Репутация:

2623

±

Замечаний:
±


Excel 2016

Общее количество листов в книге можно получить с помощью макрофункции ПОЛУЧИТЬ.РАБОЧУЮ.КНИГУ(), а начиная с Excel 2013, в функциях листа появилась функция категории Проверка свойств и значенийЛИСТЫ(), которая возвращает количество листов в ссылке


ЮMoney:41001419691823 | WMR:126292472390

 

Ответить

frukti4ek

Дата: Вторник, 23.04.2013, 17:49 |
Сообщение № 3

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 117

Что то у меня не получается, может подскажите на примере, я вложу файлик!

К сообщению приложен файл:

8777353.xls
(13.5 Kb)

 

Ответить

Serge_007

Дата: Вторник, 23.04.2013, 17:54 |
Сообщение № 4

Группа: Админы

Ранг: Местный житель

Сообщений: 15894


Репутация:

2623

±

Замечаний:
±


Excel 2016

Цитата (frukti4ek)

Что то у меня не получается

А что Вы пытались сделать? В файле нет ни одной формулы


ЮMoney:41001419691823 | WMR:126292472390

 

Ответить

frukti4ek

Дата: Вторник, 23.04.2013, 18:03 |
Сообщение № 5

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 117

Написала

К сообщению приложен файл:

7492282.xls
(13.5 Kb)

 

Ответить

Serge_007

Дата: Вторник, 23.04.2013, 18:10 |
Сообщение № 6

Группа: Админы

Ранг: Местный житель

Сообщений: 15894


Репутация:

2623

±

Замечаний:
±


Excel 2016

Цитата (frukti4ek)

Написала

Я уже решение Вам выложил постом ранее

ЗЫ Макрофункции не работают на листе, об этом прямо написано в статье про них


ЮMoney:41001419691823 | WMR:126292472390

 

Ответить

frukti4ek

Дата: Вторник, 23.04.2013, 18:13 |
Сообщение № 7

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 117

Спасибо! буду разбираться

 

Ответить

JustMe

Дата: Четверг, 20.08.2015, 11:09 |
Сообщение № 8

Группа: Пользователи

Ранг: Новичок

Сообщений: 14


Репутация:

0

±

Замечаний:
0% ±


Excel 2010

Хмн… фигня какая-то. Эксель 2010 у меня почему-то не имеет ни ПОЛУЧИТЬ.РАБОЧУЮ.КНИГУ(), ни ЛИСТЫ(). Способ с суммой, конечно же, до безобразия прост, но он подходит для случаев, когда нужно посчитать количество листов в книге, а не страниц на распечатку. Поэтому позвольте поднять этого зомбия и спросить ещё раз.
Как посчитать количество страниц на распечатку?
ЗЫ. что за странный макрос прикручен к файлам в теме? случайно ни там описаны данные функции?
[moder]Хмн… фигня какая-то. Правила форума не читаны, вопрос вообще про другое, зомбиев каких-то поднимаем, короче, сплошное безобразие.
Тему закрываю.

Сообщение отредактировал _Boroda_Четверг, 20.08.2015, 11:14

 

Ответить

В этой статье описаны синтаксис формулы и использование листов в Microsoft Excel.

Описание

Возвращает количество листов в ссылке.

Синтаксис

Аргументы функции ЛИСТЫ описаны ниже.

Ссылка Необязательный аргумент. Ссылка — это ссылка, для которой необходимо знать количество листов. Если опустить аргумент «Ссылка», функция ЛИСТЫ возвращает количество листов в книге, которая содержит функцию.

Замечания

Функция ЛИСТЫ включает в себя все листы (видимые, скрытые или очень скрытые), кроме всех остальных типов листов (макросов, диаграмм или диалогов).

Если ссылка не является допустимым значением, то листы возвращают значение #REF! (значение ошибки).

Функция ЛИСТЫ недоступна в объектной модели (OM), поскольку там уже содержится похожая функция.

Пример

Скопируйте образец данных из следующей таблицы и вставьте их в ячейку A1 нового листа Excel. Чтобы отобразить результаты формул, выделите их и нажмите клавишу F2, а затем — клавишу Enter. При необходимости измените ширину столбцов, чтобы видеть все данные.

Так как не указан аргумент «Ссылка», возвращается общее количество листов в книге (3).

Возвращает количество листов в ссылке 3D «Мои3DСсылки», которая включает Лист2 и Лист3 (2).

Как узнать сколько листов в книге excel

Я уже решение Вам выложил постом ранее

ЗЫ Макрофункции не работают на листе, об этом прямо написано в статье про них

Я уже решение Вам выложил постом ранее

ЗЫ Макрофункции не работают на листе, об этом прямо написано в статье про них Serge_007

Я уже решение Вам выложил постом ранее

ЗЫ Макрофункции не работают на листе, об этом прямо написано в статье про них Автор — Serge_007
Дата добавления — 23.04.2013 в 18:10

ПОМОГИТЕ. Как проверить в Excel сколько страниц в документе?

Sub count1()

‘ программисткое решение, записываете макрос, запускаете по Alt+F8 , и в А1 и В1 смотрите ответ
Cells(1, 1) = ActiveSheet.HPageBreaks.Count ‘ это число горизонтальных разделителей страниц
Cells(2, 1) = ActiveSheet.VPageBreaks.Count ‘ это число вертикальных разделителей страниц

‘ если вертикальных разделителей нет то число страниц = ЧислоГоризонтальных+1
‘ иначе число страниц = (ЧислоВертикальных+1)х(ЧислоГоризонатльных+1)
End Sub

Like this post? Please share to your friends:
  • Как посчитать выручку от продаж в excel формула
  • Как посчитать все итоги в excel
  • Как посчитать выручку в процентах в excel
  • Как посчитать все значения в строке excel
  • Как посчитать выражение в excel