Как поставить номер страницы в Excel: все способы с примерами

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

Самая распространённая ошибка — попытка вставить номера через меню Вставка → Номер страницы, которого в Excel просто не существует. Другая проблема: пользователи путают номера страниц при печати (колонтитулы) с нумерацией строк в таблице. Мы разберём все варианты, включая скрытые функции и автоматизацию через VBA, чтобы вы могли выбрать оптимальный метод для своей задачи.

Если вам нужно пронумеровать страницы исключительно для печати документа, достаточно настроить колонтитулы. Но что делать, если требуется динамическая нумерация в самих ячейках, которая обновляется при изменении данных? Или как быть с многостраничными отчётами, где номера должны учитывать группировку листов? Ответы — ниже.

1. Нумерация страниц для печати через колонтитулы

Это базовый способ, который работает во всех версиях Excel (2010, 2013, 2016, 2019, 365 и Excel Online). Номера добавляются в верхний или нижний колонтитул и отображаются только в режиме предварительного просмотра или на распечатке.

Чтобы активировать функцию:

1. Перейдите на вкладку Вид → Режим разметки страницы (или нажмите Ctrl+Alt+P).
2. Кликните по области колонтитула (серый текст "Щелкните, чтобы добавить верхний колонтитул").
3. В панели Работа с колонтитулами → Конструктор выберите Номер страницы.

Номер появится в формате &[Page]. Вы можете отформатировать его: изменить шрифт, размер или добавить префикс (например, "Страница &[Page] из &[Pages]"). Для этого просто введите текст вручную рядом с кодом.

Чтобы увидеть результат, перейдите в Файл → Печать или нажмите Ctrl+F2. Обратите внимание: в обычном режиме просмотра номера не отображаются — это нормально.

2. Динамическая нумерация в ячейках (без макросов)

Если вам нужны номера страниц прямо в таблице (например, для дальнейшей обработки данных), используйте формулу с функцией CEILING (округление вверх). Этот метод подходит для списков, которые разбиты на "страницы" по фиксированному количеству строк.

Предположим, у вас 100 строк, и вы хотите разделить их на "страницы" по 20 строк. В ячейку A1 рядом с данными введите:

=CEILING(ROW()/20; 1)

И протяните формулу вниз. Функция ROW() возвращает номер текущей строки, а CEILING округляет результат деления до ближайшего целого числа вверх. Таким образом, строки 1–20 получат номер 1, 21–40 — номер 2 и т. д.

• ✅ Работает в Excel 2007 и новее, включая Google Sheets.
• ⚠️ При изменении количества строк на "странице" нужно обновлять формулу.
• 📌 Можно комбинировать с IF для условного форматирования (например, выделять первую строку каждой "страницы").

Для автоматического подсчёта общего числа страниц добавьте в конец списка формулу:

=CEILING(COUNTA(B:B)/20; 1)

Где B:B — столбец с данными, а 20 — количество строк на "странице".

3. Нумерация с учётом разрывов страниц

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

1. Убедитесь, что разрывы страниц установлены (вкладка Разметка страницы → Разрывы).
2. В первую ячейку столбца для нумерации (например, A1) введите:

   =CEILING(ROW(); 18)/18

   где 18 — количество строк на одной печатной странице (проверьте в Файл → Печать → Настройка полей).

3. Протяните формулу вниз.

Критичный нюанс: если вы измените масштаб печати или ориентацию страницы, количество строк на листе изменится — придётся корректировать формулу.

Для более точного расчёта используйте функцию PAGEBREAKS (доступна только через VBA), но это уже тема следующего раздела.

4. Автоматизация через VBA (для продвинутых пользователей)

Если вам нужна полностью автоматизированная нумерация с учётом всех разрывов страниц, создайте макрос. Этот метод подходит для регулярно обновляемых отчётов.

Откройте редактор VBA (Alt+F11) и вставьте следующий код в модуль листа:

Private Sub Worksheet_Activate()
Dim ws As Worksheet
Set ws = ActiveSheet
Dim lastRow As Long, i As Long, pageNum As Long
lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
pageNum = 1

For i = 1 To lastRow
If ws.HPageBreaks.Count > 0 Then
For Each hpb In ws.HPageBreaks
If i > hpb.Location.Row Then pageNum = pageNum + 1
Next hpb
End If
ws.Cells(i, "A").Value = pageNum
Next i
End Sub

Этот скрипт:

• 🔄 Обновляет нумерацию при активации листа.
• 📄 Учитывает горизонтальные разрывы страниц (HPageBreaks).
• ⚡ Работает даже при изменении масштаба печати.

Чтобы нумерация обновлялась при каждом открытии файла, поместите код в событие Workbook_Open (в модуле ThisWorkbook).

5. Нумерация в сводных таблицах и фильтрованных данных

При работе с сводными таблицами или отфильтрованными диапазонами стандартные методы нумерации ломаются: формулы ROW() возвращают физический номер строки, а не порядковый номер в видимом списке. Решение — использовать функцию SUBTOTAL.

Введите в первую ячейку столбца для нумерации:

=SUBTOTAL(3; $B$2:B2)

И протяните формулу вниз. Здесь:

• 3 — код функции COUNTA (подсчёт непустых ячеек).
• $B$2:B2 — диапазон, который расширяется при копировании формулы.

Преимущества метода:

⚠️ Внимание: Функция SUBTOTAL игнорирует скрытые строки, поэтому нумерация будет корректной даже после применения фильтров.

Для сводных таблиц лучше создать вычисляемое поле с аналогичной логикой или использовать Power Query для предварительной нумерации данных.

6. Нумерация в Google Sheets и альтернативных редакторах

В Google Таблицах нет колонтитулов, но есть альтернативные способы нумерации:

Для печати:

• 🖨️ Используйте меню Файл → Печать → Настройка и предварительный просмотр.
• 📝 Вручную добавьте номер в шапку таблицы (например, в ячейку A1) и настройте печать заголовков (Файл → Параметры страницы).

Для динамической нумерации:

Аналогично Excel, используйте формулу:

=ARRAYFORMULA(CEILING(ROW(A2:A)/20))

Где 20 — количество строк на "странице".

В LibreOffice Calc и OnlyOffice нумерация через колонтитулы настраивается аналогично Excel, но путь к меню может отличаться (например, Формат → Страница → Колонтитулы).

7. Распространённые ошибки и как их избежать

Даже опытные пользователи допускают ошибки при нумерации страниц. Вот самые частые из них:

Ещё одна типичная проблема — сброс нумерации при копировании листа. Чтобы этого избежать, используйте ссылки на ячейки с абсолютными адресами (например, $A$1) или переносите нумерацию через Специальную вставку → Формулы.

Убедиться, что колонтитулы включены

Проверить количество строк на странице

Обновить формулы (F9)

Скрыть ненужные столбцы/строки

-->

8. Продвинутые техники: нумерация с группировкой и условным форматированием

Для сложных отчётов полезно комбинировать нумерацию с группировкой данных и визуальным выделением. Например, можно:

• 🎨 Выделить цветом первую строку каждой "страницы" через Условное форматирование → Формула:

  =MOD(ROW(); 20)=1

  (где 20 — строк на странице).

• 📊 Добавить разделители между "страницами" с помощью функции IF:

  =IF(MOD(ROW(); 20)=1; "=== Страница " & CEILING(ROW()/20; 1) & " ==="; "")

• 🔗 Создать оглавление с гиперссылками на каждую "страницу" (через ГИПЕРССЫЛКА).

Для многоуровневой нумерации (например, "1.1", "1.2", "2.1") используйте комбинацию функций CEILING и TEXT:

=TEXT(CEILING(ROW()/20; 1); "0") & "." & TEXT(MOD(ROW()-1; 20)+1; "0")

Этот приём полезен для юридических документов или технических спецификаций, где требуется иерархическая структура.

FAQ: Ответы на частые вопросы

Sub ContinuousPageNumbers()
Dim ws As Worksheet, totalPages As Long
For Each ws In ThisWorkbook.Worksheets
ws.PageSetup.CenterFooter = "Страница " & totalPages + 1 & " из " & (totalPages + ws.HPageBreaks.Count + 1)
totalPages = totalPages + ws.HPageBreaks.Count + 1
Next ws
End Sub

=IF(&[Page]=1; ""; "Страница " & &[Page])