How to print uneven pages Excel 97

[David D]

I need to print uneven pages only in Microsoft Excel 97.
I am new to this. Could someone help please. Thanks.
David

 

[Dave Peterson]

Does uneven pages mean the odd pages (1,3,5,7,...)?

If yes, maybe you could use a macro (a post by Dana DeLouis):
http://groups.google.com/groups?threadm=e3ckV8uH$GA.277@cppssbbsa05

If you're new to macros, you may want to read David McRitchie's intro at:
http://www.mvps.org/dmcritchie/excel/getstarted.htm

 

[Gord Dibben]

David

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

Note Dave P.'s pointer to David McRitchie's "Getting Started with Macros"

Gord Dibben XL2002

 

[mseyf]

click on View>Page Break Preview. Drag or insert page breaks as neede