Note: The other languages of the website are Google-translated. Back to English

Как распечатать несколько выбранных строк на одной странице в Excel?

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

Распечатать несколько выбранных строк на одной странице с помощью VBA

Распечатать несколько выбранных строк на одной странице с копированием на один рабочий лист

Распечатать несколько выбранных строк на одной странице с помощью Kutools for Excel

Пакетная печать нескольких выборок (всех областей печати) на одной странице в Excel

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

объявление печать множественный выбор 2

Вкладка Office позволяет редактировать и просматривать в Office с вкладками и значительно упрощает работу ...
Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%
  • Повторное использование чего угодно: Добавляйте наиболее часто используемые или сложные формулы, диаграммы и все остальное в избранное и быстро используйте их в будущем.
  • Более 20 текстовых функций: Извлечь число из текстовой строки; Извлечь или удалить часть текстов; Преобразование чисел и валют в английские слова.
  • Инструменты слияния: Несколько книг и листов в одну; Объединить несколько ячеек / строк / столбцов без потери данных; Объедините повторяющиеся строки и сумму.
  • Разделить инструменты: Разделение данных на несколько листов в зависимости от ценности; Из одной книги в несколько файлов Excel, PDF или CSV; От одного столбца к нескольким столбцам.
  • Вставить пропуск Скрытые / отфильтрованные строки; Подсчет и сумма по цвету фона; Отправляйте персонализированные электронные письма нескольким получателям массово.
  • Суперфильтр: Создавайте расширенные схемы фильтров и применяйте их к любым листам; Сортировать по неделям, дням, периодичности и др .; Фильтр жирным шрифтом, формулы, комментарий ...
  • Более 300 мощных функций; Работает с Office 2007-2021 и 365; Поддерживает все языки; Простое развертывание на вашем предприятии или в организации.

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

1. Нажмите другой + F11 одновременно клавиши, чтобы открыть окно Microsoft Visual Basic для приложений.

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

VBA: печать нескольких выбранных строк на одной странице в Excel

Sub Extract_to_Print()
Dim Rg As Range, Rg1 As Range, Rg2 As Range
Dim xAddress As String
Dim xSht As Worksheet
Dim I As Long
Dim xScreenUpdate As Boolean
Dim xAlert As Boolean
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set Rg = Application.InputBox("Please select ranges you will print:", "Kutools for Excel", xAddress, , , , , 8)
If Rg Is Nothing Then Exit Sub
xScreenUpdate = Application.ScreenUpdating
xAlert = Application.DisplayAlerts
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xSht = ThisWorkbook.Worksheets.Add
I = 1
For Each Rg1 In Rg.Areas
Rg1.Copy xSht.Range("A" & I)
I = I + Rg1.Rows.Count
Next
xSht.PrintOut
xSht.Delete
Application.ScreenUpdating = xScreenUpdate
Application.DisplayAlerts = xAlert
End Sub

3. Нажмите F5 ключ или щелкните Run кнопку для запуска этого VBA.

4. Теперь появится диалоговое окно Kutools for Excel. Выберите несколько строк, которые вы хотите распечатать, и нажмите кнопку OK кнопку, чтобы напечатать эти строки.

Внимание: Держа Ctrl key, вы можете выбрать несколько несмежных строк одновременно.


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

Kutools for Excel - Включает более 300 удобных инструментов для Excel. Полнофункциональная бесплатная пробная версия 30-день, кредитная карта не требуется! Бесплатная пробная версия сейчас!

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

Внимание: Держа Ctrl клавишу, вы можете выбрать несколько непоследовательных строк одновременно.

2. В открывшемся диалоговом окне «Копировать несколько диапазонов» установите флажок Всё и нажмите Ok кнопку.

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

3. Выберите ячейку A1 в новом созданном листе и щелкните значок OK Кнопка.

4. Оставайтесь на рабочем листе назначения и щелкните Кутулс > Удалить > Удалить пустые строки > В активном листе.

Затем появляется диалоговое окно, в котором показано, сколько строк было удалено. Просто закрой это.

5. Нажмите Файл (или Кнопка офиса)> Печать чтобы напечатать эти строки.

Kutools for Excel - Включает более 300 удобных инструментов для Excel. Полнофункциональная бесплатная пробная версия 30-день, кредитная карта не требуется! Get It Now


На самом деле Kutools для проектов Excel Мастер печати множественного выбора для совместной печати нескольких диапазонов в Excel.

Kutools for Excel - Включает более 300 удобных инструментов для Excel. Полнофункциональная бесплатная пробная версия 30-день, кредитная карта не требуется! Бесплатная пробная версия сейчас!

1. Нажмите Предприятие > печать > Мастер печати множественного выбора , чтобы открыть мастер печати множественного выбора.

2. В открывшемся мастере печати множественного выбора нажмите Добавить кнопка  чтобы добавить строки, которые вы будете печатать вместе, и щелкните Завершить кнопку.

Ноты:

(1) После нажатия Добавить кнопка , вы можете выбрать несколько непоследовательных диапазонов на одном листе, удерживая Ctrl клавишу и затем выбирая их по очереди;

(2) Чтобы удалить диапазон / строку из Диапазоны для печати список, просто выберите этот диапазон / строку и щелкните Удалить кнопка.

(3) Эта утилита не поддерживает печать целых строк и столбцов, например целой строки $ 4: $ 4, или весь столбец $ B: $ B.

3. Выбранные строки / диапазоны были вставлены как связанные изображения на новый рабочий лист. Продолжайте нажимать Файл (или Кнопка офиса)> Печать распечатать это.

Kutools for Excel - Включает более 300 удобных инструментов для Excel. Полнофункциональная бесплатная пробная версия 30-день, кредитная карта не требуется! Get It Now


Kutools for Excel включает более 300 удобных инструментов для Excel, которые можно бесплатно попробовать без ограничений в течение 30 дней. Скачать и бесплатную пробную версию сейчас!

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

Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%

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

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

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
офисный дно
Сортировать комментарии по
Комментарии (0)
Оценок пока нет. Оцените первым!
Здесь еще нет комментариев
Оставляйте свои комментарии
Публикация как гость
×
Оценить этот пост:
0   Характеристики
Предлагаемые места

Подписывайтесь на Нас

Copyright © 2009 - www.extendoffice.ком. | Все права защищены. Питаться от ExtendOffice, | Карта сайта
Microsoft и логотип Office являются товарными знаками или зарегистрированными товарными знаками Microsoft Corporation в США и / или других странах.
Защищено Sectigo SSL