Возможно, вы не знакомы с ранее запущенным VBA, но, выполнив следующие действия, вы сможете узнать, как запустить VBA для вставки разрыва страницы через каждые X строк. Здесь я буду вставлять разрыв страницы через каждые 3 строки.

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

2. В окне нажмите Вставить > Модули чтобы отобразить новое окно модуля, затем скопируйте следующий код VBA в окно модуля.

VBA: вставлять разрыв страницы в каждые X строк на листе.

Sub InsertPageBreaks()
'Updateby20140618
Dim xLastrow As Long
Dim xWs As Worksheet
Set xWs = Application.ActiveSheet
xRow = Application.InputBox("Row", xTitleId, "", Type:=1)
xWs.ResetAllPageBreaks
xLastrow = xWs.Range("A1").SpecialCells(xlCellTypeLastCell).Row
For i = xRow + 1 To xLastrow Step xRow
    xWs.HPageBreaks.Add Before:=xWs.Cells(i, 1)
Next
End Sub

3. Нажмите Run и появляется диалоговое окно, в котором вы можете указать каждые X строк, в которые вы хотите вставить разрыв страницы. Здесь я вставляю разрыв страницы в каждые 3 строки. Смотрите скриншот:

4. Нажмите OK, а затем вставит разрыв страницы в каждые X строк.

Быстро вставлять разрыв страницы в каждую (n-ю) строку активного листа

Обычно мы вставляем один разрыв страницы при нажатии Макет страницы > Перерывы > Вставить разрыв страницы. Но таким образом слишком утомительно пакетно вставлять несколько разрывов страниц на лист, например, вам нужно вставлять по одному разрыву страницы в каждую строку для печати каждой строки на отдельной странице. Не волнуйся! Kutools для Excel Вставить разрыв страницы в каждую строку утилита поможет вам легко его заархивировать!

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

1. Нажмите Разделить на столбцы на Кутулс Плюс меню.

2. В открывшемся диалоговом окне Разделить на столбцы вам необходимо:

(1) Нажмите кнопку "Обзор".  в Диапазон названий и выберите строку заголовка в указанном диапазоне, в который вы будете вставлять разрывы страниц.
(2) Нажмите кнопку "Обзор". в Диапазон дат и выберите диапазон, в который вы будете выполнять пакетную вставку разрывов страниц.
(3) В Строк на печатной странице поле введите число. (Функции: Например, если вам нужно вставить разрывы страниц после каждых 3 строк, введите 3 в поле; если вам нужно инертить разрывы страниц после каждой строки, введите 1.)
(4) Введите 1 в Количество сегментов пунктом.

3, Нажмите Ok .

Теперь вы увидите, что диапазон копируется на новый лист, а разрывы страниц добавляются после каждых x строк с сохранением заголовка диапазона. Вы также можете переключиться в режим предварительного просмотра разрыва страницы, нажав Вид > Предварительный просмотр разрыва страницы чтобы увидеть эти разрывы страниц. См. Снимок экрана ниже.

Kutools for Excel разрабатывает еще одну утилиту Insert Page Break Every Row, специализирующуюся на вставке разрывов страниц после каждых x строк.

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

2. В открывшемся диалоговом окне «Вставить разрыв страницы в каждую строку» укажите интервал строк, в которые вы будете вставлять разрывы страниц, и щелкните значок Ok .

Тогда вы увидите, что разрывы страниц вставляются сразу с заданным интервалом строк.