Перейти к содержимому

Как печатать строки повторно внизу каждой напечатанной страницы в Excel?

Author: Siluvia Last Modified: 2025-06-05

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

Печать строк повторно внизу с помощью кода VBA


Печать строк повторно внизу с помощью кода VBA

Вы можете запустить приведенный ниже код VBA, чтобы вставить указанную строку в нижний колонтитул каждой страницы. После этого вы сможете печатать эту строку повторно внизу каждой напечатанной страницы в Excel.

1. Нажмите клавиши Alt + F11 одновременно, чтобы открыть окно Microsoft Visual Basic for Application.

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

Код VBA: Вставка указанной строки в нижние колонтитулы каждой напечатанной страницы

Sub MyFooter()
	Dim xTxt As String
	Dim xAddress As String
	Dim xRg As Range
	Dim xCell As Range
	On Error Resume Next
	xAddress = ActiveWindow.RangeSelection.Address
	Set xRg  = Application.InputBox("Select the row you will insert repeatedly at the bottom:", "Kutools for Excel", xAddress, , , , , 8)
	If xRg Is Nothing Then Exit Sub
		For Each xCell In xRg
			xTxt = xTxt & xCell.Value & " "
		Next
		ActiveSheet.PageSetup.LeftFooter = xTxt
	End Sub

3. Нажмите клавишу F5, чтобы запустить код. Затем появится диалоговое окно Kutools для Excel, пожалуйста, выберите строку, которую нужно печатать повторно внизу каждой напечатанной страницы, и затем нажмите кнопку ОК.

A screenshot showing how to select rows to repeat at the bottom of every printed page

Теперь содержимое указанной строки добавлено в нижний колонтитул каждой напечатанной страницы текущего листа. Вы можете начать печатать лист.

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


Легко повторять строки заголовков через каждые n-строк в Excel:

Kutools для Excel's Вставить строки заголовковутилита поможет вам быстро вставить строку заголовка перед каждой n-й строкой в выбранном диапазоне в Excel, как показано на скриншоте ниже.
Скачайте и попробуйте прямо сейчас!

A screenshot of Kutools for Excel's Insert Title Rows utility, which helps repeat title rows in every nth row

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

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

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


Office Tab добавляет вкладки в Office и делает вашу работу намного проще

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