Как распечатать четные / нечетные страницы только в Excel?
В работе с Excel вам обычно может потребоваться распечатать страницы, и по умолчанию вы можете распечатать выделенный фрагмент, распечатать всю книгу или распечатать определенные страницы, например, страницы с 1 по 3, но знаете ли вы, как распечатать только четные страницы или нечетные страницы активной книги? В этой статье я расскажу о приемах, которые помогут вам распечатать только четные или нечетные страницы только в книге Excel.
Печатать четные / нечетные страницы только с VBA
Печать определенных страниц с помощью Kutools for Excel
Распечатать первую страницу каждого рабочего листа с помощью Kutools for Excel
Печатать четные / нечетные страницы только с VBA
В Excel, если вы хотите распечатать только четные или нечетные страницы, для этого можно применить VBA.
1. Нажмите Alt + F11 ключи для открытия Microsoft Visual Basic для приложений окно.
2. И нажмите Вставить > Модули, затем вставьте ниже код VBA в новый Модули окно.
VBA: печатать только четные или нечетные страницы
Sub PrintOddEven()
'UpdatebyKutoolsforExcel20160105
Dim xPages As Long
Dim xFPage As Variant
Dim Page As Integer
xPages = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
xFPage = Application.InputBox("Enter 1 for odd pages, enter 2 for even pages", "Kutools for Excel", , , , , , 1)
If TypeName(xFPage) = "Boolean" Then Exit Sub
If xFPage > 0 Then
xFPage = Abs((xFPage Mod 2) - 2)
For Page = xFPage To xPages Step 2
ActiveSheet.PrintOut Page, Page
Next
End If
End Sub
3. Нажмите F5 для выполнения VBA и введите 1 чтобы распечатать все нечетные страницы, или введите 2 распечатать все четные страницы во всплывающем Kutools for Excel диалог. Смотрите скриншот:
4. Нажмите OK, и печатаются только нечетные или четные страницы.
Печать определенных страниц с помощью Kutools for Excel
Если вы не знакомы с кодом VBA, вы можете подать заявку Kutools for Excel's Печать определенных страниц утилита, она может быстро распечатать определенные страницы только по мере необходимости, например, печатать только нечетные / четные страницы, печатать только 5-12 страниц.
После установки Kutools for Excel, пожалуйста, сделайте, как показано ниже :(Скачать бесплатно Kutools for Excel сейчас!)
Нажмите Кутулс Плюс > Печать > Печать определенных страниц, и в появившемся диалоговом окне отметьте Нечетные страницы or Даже страницы вариант как вам нужно. Смотрите скриншот:
Нажмите Ok. а затем печатались только нечетные или четные страницы.
Печать только нечетных / четных / определенных страниц
Распечатать первую страницу каждого рабочего листа с помощью Kutools for Excel
Если в вашей открытой книге есть несколько листов и теперь вы хотите распечатать всю первую страницу каждого листа, в этом случае вы можете применить Распечатать первую страницу каждого рабочего листа полезности Kutools for Excel чтобы быстро это сделать.
После установки Kutools for Excel, пожалуйста, сделайте, как показано ниже :(Скачать бесплатно Kutools for Excel сейчас!)
Включите книгу, которую вы хотите напечатать первую страницу каждого листа, и нажмите Кутулс Плюс > Печать > Распечатать первую страницу каждого рабочего листа. Смотрите скриншот:
Затем печатаются все первые страницы каждого листа.
Относительные статьи:
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!