Совет. Другие языки - Google-Translated. Вы можете посетить English версия этой ссылки.
Войти
x
or
x
x
Регистрация
x

or

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

doc insert page page измененные значения 1

Предположим, у меня есть диапазон ячеек, и теперь я хочу вставлять разрывы страниц в рабочий лист, когда значения в столбце A меняются, как показано на следующем скриншоте. Конечно, вы можете вставлять их по одному, но есть ли какие-либо быстрые способы вставки разрывов страниц сразу на основе измененных значений одного столбца?

Вставьте разрывы страниц, когда значение изменяется с кодом VBA

Вставка страницы разбивает каждые x строк с помощью Kutools for Excel


arrow синий правый пузырь Вставьте разрывы страниц, когда значение изменяется с кодом VBA


Следующий код VBA может помочь вам вставить разрывы страниц ниже, основываясь на изменениях данных колонок, пожалуйста, сделайте следующее:

1. Удерживая нажатой ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окна.

2. Щелчок Вставить > модуль, и вставьте следующий код в модуль Окно.

Код VBA: вставлять разрывы страниц при изменении значения:

Sub insertpagebreaks()
'updateby Extendoffice 20151228
    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. См. снимок экрана:

doc insert page page измененные значения 2

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


arrow синий правый пузырь Вставка страницы разбивает каждые x строк с помощью Kutools for Excel

Иногда вам может потребоваться вставить разрывы страниц каждые n строк, вот полезный инструмент,Kutools for Excel, С его Вставить разрыв страницы в каждую строку утилиту, вы можете быстро завершить эту работу в Excel.

Kutools for Excel : с более чем 300 удобными надстройками Excel, бесплатно попробовать без ограничений в 60-дни.

После установки Kutools for Excel, сделайте следующее :( Скачать Kutools для Excel сейчас! )

1. Щелчок Предприятие > печать > Вставить разрыв страницы в каждую строку, см. снимок экрана:

doc insert page page измененные значения 3

2, В появившемся Вставить разрыв страницы в каждую строку prompt введите число интервалов, в которое вы хотите вставить разрыв страницы под Интервал раздел, см. снимок экрана:

doc insert page page измененные значения 4

3, Затем нажмите Ok кнопка, разрывы страниц были вставлены в текущий рабочий лист каждые строки 5, см. снимок экрана:

doc insert page page измененные значения 5

Скачать Kutools для Excel сейчас!


Kutools для Excel - лучший инструмент для повышения производительности в офисе Повысьте производительность на 80%

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

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

  • Включить редактирование и чтение с вкладками в Word, Excel, PowerPoint, Издатель, Доступ, Visio и Проект.
  • Открывайте и создавайте несколько документов в новых вкладках одного и того же окна, а не в новых окнах.
  • Увеличивает вашу производительность на 50% и уменьшает сотни щелчков мышью для вас каждый день!
нижняя часть офиса
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Mike MItsch · 14 days ago
    That is truly brilliant! I followed along on your VB example and it worked! I also am an owner of KUTools so I will play with that too.

    Very impressed and thanks!

    Mike
  • To post as a guest, your comment is unpublished.
    GUEST · 8 months ago
    Sorry. EDIT: The first ROW is a column header.
  • To post as a guest, your comment is unpublished.
    GUEST · 8 months ago
    Hello, Thank you! The thought of VBA makes me sweat. I do have one problem with the results of this code though. The first column is a column header. The code treats this as a change. My first page only shows the column header, but he following pages are fine. FYI: This is for a monthly report and the number of rows for each criteria change monthly. Any Ideas? Thank you in advance.