Как напечатать несколько выделенных областей на одной странице в Excel?
Если у вас есть большая таблица, содержащая много данных, и вы хотите распечатать некоторые выбранные диапазоны, которые не являются непрерывными, на одной странице, чтобы сэкономить бумагу, Excel предоставляет функцию Настройки области печати, которая позволяет нам печатать несколько выделений одновременно. Однако каждый выбранный диапазон будет напечатан на отдельной странице. В этой статье мы расскажем о том, как напечатать несколько несмежных выделений на одной странице.
Печать нескольких выделений с одного листа на одной странице с помощью кода VBA
Печать нескольких выделений с одного или нескольких листов на одной странице с помощью Kutools для Excel
Печать нескольких выделений с одного листа на одной странице с помощью кода VBA
Чтобы напечатать несколько выбранных несмежных диапазонов одного листа на одной странице, следующий код VBA может вам помочь. Пожалуйста, выполните следующие действия:
1. Нажмите клавишу Ctrl, чтобы выбрать диапазоны, которые вы хотите напечатать.
2. Удерживайте клавиши ALT + F11, и откроется окно Microsoft Visual Basic for Applications.
3. Щелкните Вставка > Модуль и вставьте следующий код в окно Модуля.
Код VBA: Печать нескольких выделений на одну страницу
Sub PrintOutRange()
'Updateby Extendoffice
Dim xRng1 As Range
Dim xRng2 As Range
Dim xNewWs As Worksheet
Dim xWs As Worksheet
Dim xIndex As Long
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xWs = ActiveSheet
Set xNewWs = Worksheets.Add
xWs.Select
xIndex = 1
For Each xRng2 In Selection.Areas
xRng2.Copy
Set xRng1 = xNewWs.Cells(xIndex, 1)
xRng1.PasteSpecial xlPasteValues
xRng1.PasteSpecial xlPasteFormats
xIndex = xIndex + xRng2.Rows.Count
Next
xNewWs.Columns.AutoFit
xNewWs.PrintOut
xNewWs.Delete
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
4. Затем нажмите клавишу F5, чтобы запустить этот код, и ваши выбранные диапазоны будут напечатаны сразу же, и они будут напечатаны на одной странице.
Печать нескольких выделений с одного или нескольких листов на одной странице с помощью Kutools для Excel
Приведенный выше код может помочь вам только в печати выбранных диапазонов с одного листа. Если вы хотите напечатать несколько выделений из нескольких листов на одной странице, приведенный выше код не сработает. Не беспокойтесь, здесь я могу представить вам удобный инструмент – Kutools для Excel. С помощью его утилиты Мастер множественной печати вы можете напечатать выделения с одного листа или нескольких листов на одной странице сразу.
После установки Kutools для Excel выполните следующие шаги:
1. Щелкните Kutools Plus > Печать > Мастер множественной печати, см. скриншот:
2. В Мастере множественной печати, щелкните 
кнопку, чтобы выбрать и добавить диапазон, который вы хотите напечатать, в список диапазонов для печати по одному (вы можете выбирать диапазоны с одного листа или нескольких листов), щелкните 
кнопку, чтобы удалить диапазоны, которые вам не нужны, см. скриншот:
3. После добавления выделений в список, пожалуйста, нажмите кнопку Далее >>, чтобы перейти к шагу 2 мастера, укажите настройки печати по вашему усмотрению, и вы можете добавить пустую строку между выбранными диапазонами, отметив опцию Добавить пустую строку между диапазонами, см. скриншот:
4. Затем продолжайте нажимать кнопку Далее >>; на шаге 3 мастера укажите действие для временного листа, вы можете активировать лист, но не печатать его, напечатать и сохранить его или напечатать и удалить его. См. скриншот:
5. Нажмите кнопку Завершить, все выбранные диапазоны будут вставлены в новый лист в виде связанных объектов-изображений. Вы можете перетаскивать и переупорядочивать их на листе. См. скриншот:
6. Когда вы печатаете этот новый лист, диапазоны будут напечатаны на одной странице, как вам нужно.
Нажмите, чтобы узнать больше об этом инструменте Мастер множественной печати.
Kutools для Excel - Усильте Excel более чем 300 необходимыми инструментами. Наслаждайтесь постоянно бесплатными функциями ИИ! Получите прямо сейчас
Демонстрация: Печать нескольких выделений с одного или нескольких листов на одной странице с помощью Kutools для Excel
Лучшие инструменты для повышения продуктивности в Office
Повысьте свои навыки работы в Excel с помощью Kutools для Excel и ощутите эффективность на новом уровне. Kutools для Excel предлагает более300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы выбрать функцию, которая вам нужнее всего...
Office Tab добавляет вкладки в Office и делает вашу работу намного проще
- Включите режим вкладок для редактирования и чтения в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна вместо новых отдельных окон.
- Увеличьте свою продуктивность на50% и уменьшите количество щелчков мышью на сотни ежедневно!
Все надстройки Kutools. Один установщик
Пакет Kutools for Office включает надстройки для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro — идеально для команд, работающих в разных приложениях Office.
- Комплексный набор — надстройки для Excel, Word, Outlook и PowerPoint плюс Office Tab Pro
- Один установщик, одна лицензия — настройка занимает считанные минуты (MSI-совместимо)
- Совместная работа — максимальная эффективность между приложениями Office
- 30-дневная полнофункциональная пробная версия — без регистрации и кредитной карты
- Лучшее соотношение цены и качества — экономия по сравнению с покупкой отдельных надстроек