Microsoft KB Archive/101075

= ACC: How to Print Odd or Even Pages of a Report =

Article ID: 101075

Article Last Modified on 1/18/2007

-

APPLIES TO


 * Microsoft Access 1.0 Standard Edition
 * Microsoft Access 1.1 Standard Edition
 * Microsoft Access 2.0 Standard Edition
 * Microsoft Access 95 Standard Edition
 * Microsoft Access 97 Standard Edition

-



This article was previously published under Q101075



Moderate: Requires basic macro, coding, and interoperability skills.



SUMMARY
This article describes how to print separately the odd and even pages of a report for duplex printing or to print reports with different margins for binder storage.

NOTE: This article explains a technique demonstrated in the sample files, RptSampl.exe (for Microsoft Access for Windows 95 version 7.0) and RptSmp97.exe (for Microsoft Access 97). For information about how to obtain these sample files, please see the following articles in the Microsoft Knowledge Base:

145777 ACC95: Microsoft Access Sample Reports Available in Download Center

175072 ACC97: Microsoft Access 97 Sample Reports Available in Download Center



MORE INFORMATION
The best way to print separately odd and even pages of report is to set up a form that prompts you for the pages to print (odd or even) and then calls a macro to print the report. The form in the example below contains a text box control to hold the value "odd" or "even" and a command button to print the report.

NOTE: When you use the following steps to print even pages, all the odd pages generate blank pages (and vice versa). Whenever you implement this routine, your report generates blank pages between each printed page.

 Create a new form called Print Odd Even Pages:  Add an unbound text box with Name = PrintPages. Add a command button with Caption = Print Report. From the OnClick property (or OnPush in version 1.x), call the following OddEven.Print macro group.   Create a new macro called OddEven.

NOTE: In the following example, an underscore (_) at the end of a line is used as a line-continuation character. Remove the underscore from the end of the line when re-creating this example.

     Macro Name      Condition                        Action --     Print                                         OpenReport TestOddEven Forms![Print Odd Even Pages] _ ![PrintPages]="Even" And _ Page Mod 2=1                    CancelEvent

Forms![Print Odd Even Pages] _ ![PrintPages]="Odd" And _ Page Mod 2=0                    CancelEvent

Print Actions --     OpenReport ReportName: Customer Labels View: Print Preview   From each report section that is printing data, call the macro group OddEven.TestOddEven from the OnPrint event procedure.

For example, in the Northwind.mdb (or NWIND.MDB in Microsoft Access 2.0 or earlier) sample database report Customer Labels, the only section that is printing is the detail section. The page header and page footer in this report do not print any values. For the detail section, set the OnPrint event procedure as follows:

<pre class="fixed_text">     OddEven.TestOddEven </li> With the form open, enter Odd or Even in the text box. When you choose the Print Report command button, the Customer Labels report opens. Press OK for all countries. The report then runs its OnPrint events, which call the macro group OddEven.TestOddEven to print only the odd or even pages.</li></ol>

Additional query words: every other page left right

Keywords: kbhowto kbusage KB101075

-

[mailto:TECHNET@MICROSOFT.COM Send feedback to Microsoft]

© Microsoft Corporation. All rights reserved.