duplex (odd/even) printing and Excel 2002

  • Thread starter Thread starter Thomas
  • Start date Start date
T

Thomas

I have a HP 895Cxi printer, which only supports a limited
set of functions in the WindowsXP driver (it's a mini
driver). It does *not* have any options to perform
odd/even page printing.

Is there any way (perhaps a custom Excel script) to get
Excel to perform this operation instead of requesting
that the driver do it? Word 2002 has this. Why doesn't
Excel 2002? It seems pretty basic.

Thanks.
 
Thomas

Run once to print your choice of odd or even numbered pages. Turn paper over
in tray then run again to print other pages.

Sub PrintDoubleSided()
Dim Totalpages As Long
Dim pg As Long
Dim oddoreven As Integer
On Error GoTo enditt
Totalpages = ExecuteExcel4Macro("Get.Document(50)")
oddoreven = InputBox("Enter 1 for Odd, 2 for Even")
For pg = oddoreven To Totalpages Step 2
ActiveWindow.SelectedSheets.PrintOut from:=pg, To:=pg
Next pg
enditt:
End Sub

If not comfortable with macros, visit David McRitchie's website on getting
started with VBA and macros or post back for further help.

http://www.mvps.org/dmcritchie/excel/getstarted.htm

Gord Dibben Excel MVP - XL97 SR2 & XL2002
 
Back
Top