Печать нечетных или четных страниц (Microsoft Excel)
При печати более длинных листов вы можете захотеть распечатать четные или нечетные страницы. К сожалению, Excel не поддерживает эту возможность. Однако есть несколько способов обойти эту проблему.
Во-первых, если ваша цель печати четных и нечетных страниц — двусторонняя печать, вы можете проверить драйвер принтера, чтобы узнать, может ли он обрабатывать двустороннюю печать или будет ли он каким-то образом печатать только нечетные или четные страницы. Такой подход позволяет полностью обойтись без Excel.
Еще один способ обойти Excel — просто создать PDF-файл из вашего вывода. Затем вы можете открыть файл PDF и использовать Acrobat или Adobe Reader для печати четных или нечетных страниц.
Если вы хотите оставаться в Excel, то, возможно, лучший способ справиться с ситуацией — создать макрос, который будет обрабатывать печать.
К такому макросу можно подойти по-разному. Вот короткий:
Sub PrintOddEven() Dim TotalPages As Long Dim StartPage As Long Dim Page As Integer StartPage = InputBox("Enter starting page number") TotalPages = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)") If StartPage > 0 And StartPage <= TotalPages Then For Page = StartPage To TotalPages Step 2 ActiveSheet.PrintOut From:=Page, To:=Page, _ Copies:=1, Collate:=True Next End If End Sub
Когда вы запускаете макрос, вас просят ввести номер начальной страницы. В большинстве случаев вы должны ввести либо 1, либо 2, но на самом деле вы можете ввести любой номер страницы, какой захотите. Затем макрос распечатывает начальную страницу и каждую вторую страницу с нее.
При желании вы можете также распечатать нечетные и четные страницы, создав два настраиваемых представления в Excel — одно для нечетных страниц и одно для четных страниц. Все, что вам нужно сделать, это указать несмежный диапазон ячеек (состоящий из ячеек на нечетных или четных страницах) в качестве области печати для каждого представления.
Например, если вы хотите определить область печати, состоящую из ячеек для всех нечетных страниц, вы можете сделать это:
-
Переключитесь на предварительный просмотр разрыва страницы.
-
Используйте мышь, чтобы выбрать все ячейки страницы 1.
-
Удерживая нажатой клавишу Ctrl, вы выбираете все ячейки на странице 3.
-
В свою очередь, удерживая нажатой клавишу Ctrl, выберите все ячейки других нечетных страниц.
-
Определите выбранные ячейки как область печати.
Выделив область печати, сохраните вид. Затем сотрите область печати, используйте ту же технику, чтобы выбрать все четные ячейки, и сохраните вид. Теперь у вас есть два представления, которые вы можете распечатать, и каждое представление будет содержать только нечетные или четные страницы. Единственным недостатком этого подхода является то, что Excel нумерует напечатанные страницы последовательно (1, 2, 3, 4) вместо того, что они есть на самом деле (1, 3, 5, 7).
_Примечание: _
Если вы хотите узнать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах ExcelTips), я подготовил специальную страницу, содержащую полезную информацию.
link: / excelribbon-ExcelTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера]
.
ExcelTips — ваш источник экономичного обучения Microsoft Excel.
Этот совет (8843) применим к Microsoft Excel 97, 2000, 2002 и 2003. Вы можете найти версию этого совета для ленточного интерфейса Excel (Excel 2007 и более поздних версий) здесь:
link: / excelribbon-Printing_Odd_or_Even_Pages [Печать нечетных или четных страниц]
.