Как вставить разрывы страниц при изменении значения в Excel?

Предположим, у меня есть диапазон ячеек, и теперь я хочу вставить разрывы страниц в лист, когда значения в столбце A меняются, как показано на скриншоте слева. Конечно, вы можете вставлять их по одному, но существуют ли быстрые способы вставить разрывы страниц сразу на основе измененных значений одного столбца?
Вставка разрывов страниц при изменении значения с помощью кода VBA
Вставка разрывов страниц при изменении значения с помощью мощной функции
Вставка разрывов страниц при изменении значения с помощью кода VBA
Следующий код VBA может помочь вам вставить разрывы страниц ниже на основе изменений данных в одном столбце, пожалуйста, выполните следующие действия:
1. Удерживайте клавиши ALT + F11, чтобы открыть окно Microsoft Visual Basic for Applications.
2. Нажмите Вставить > Модуль и вставьте следующий код в окно Модуля.
Код VBA: Вставка разрывов страниц при изменении значения:
Sub insertpagebreaks()
'updateby Extendoffice
Dim I As Long, J As Long
J = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row
For I = J To 2 Step -1
If Range("A" & I).Value <> Range("A" & I - 1).Value Then
ActiveSheet.HPageBreaks.Add Before:=Range("A" & I)
End If
Next I
End Sub
3. Затем нажмите клавишу F5, чтобы запустить этот код, все разрывы страниц будут вставлены в лист при изменении данных в столбце A. См. скриншот:

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

1. Нажмите Kutools > Формат > Отметить изменения в столбце, см. скриншот:

2. В открывшемся диалоговом окне Отметить изменения в столбце выполните следующие операции:
- Выберите диапазон данных и ключевой столбец, который вы хотите использовать;
- Выберите Разрыв страницы из поля Опции.

3. Затем нажмите кнопку ОК, разрывы страниц будут вставлены в диапазон на основе изменений значений, см. скриншот:

Kutools для Excel - Усильте Excel более чем 300 необходимыми инструментами. Наслаждайтесь постоянно бесплатными функциями ИИ! Получите прямо сейчас
Больше связанных статей:
- Выделение строк при изменении значения ячейки в Excel
- Если в вашем листе есть список повторяющихся значений, и вам нужно выделить строки на основе столбца A, где значение ячейки меняется, как показано на следующем скриншоте. На самом деле, вы можете быстро и легко выполнить эту задачу, используя функцию Условное форматирование.
- Увеличение чисел при изменении значения в другом столбце
- Предположим, у вас есть список значений в столбце A, и теперь вы хотите увеличивать число на 1 в столбце B, когда значение в столбце A меняется, что означает, что числа в столбце B увеличиваются до тех пор, пока значение в столбце A не изменится, затем счет начинается снова с 1, как показано на скриншоте слева. В Excel вы можете решить эту задачу следующим способом.
- Суммирование ячеек при изменении значения в другом столбце
- Когда вы работаете в Excel, иногда вам может понадобиться суммировать ячейки на основе группы данных в другом столбце. Например, здесь я хочу суммировать заказы в столбце B, когда данные меняются в столбце A, чтобы получить следующий результат. Как можно решить эту проблему в Excel?
- Вставка пустых строк при изменении значения в Excel
- Предположим, у вас есть диапазон данных, и теперь вы хотите вставить пустые строки между данными при изменении значения, чтобы разделить последовательные одинаковые значения в одном столбце, как показано на следующих скриншотах. В этой статье я расскажу о некоторых приемах для решения этой проблемы.
- Запуск макроса при изменении значения ячейки в Excel
- Обычно в Excel мы можем нажать клавишу F5 или кнопку Выполнить, чтобы выполнить код VBA. Но пробовали ли вы запустить определенный макрос, когда значение ячейки меняется? В этой статье я представлю несколько быстрых приемов для выполнения этой задачи в Excel.
Лучшие инструменты для повышения продуктивности в Office
Повысьте свои навыки работы в Excel с Kutools для Excel и ощутите новую эффективность. Kutools для Excel предлагает более300 расширенных функций для повышения продуктивности и экономии времени. Щелкните здесь, чтобы получить наиболее нужную вам функцию...
Office Tab добавляет вкладочный интерфейс в Office, делая вашу работу значительно проще
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна, а не в новых окнах.
- Увеличьте свою продуктивность на50% и сократите сотни кликов мышью ежедневно!