Posted to microsoft.public.excel.misc
|
|
Printing Odd or Even Pages
Hi Naveen,
and you have not answered my second question
2. How to print some specified pages only (ex: 1,5, 8 to 10).
Select the required sheets, by control-clicking them, and check the
'Active
sheets' option in the print dialog. Remember to remove the multi-sheet
selection - click an unselected sheet.
---
Regards,
Norman
"NAVEEN" wrote in message
...
Thank you very much. It is very useful for me.
and you have not answered my second question
"How can I print page 1, 2, 5, and 8 to 10 in Sheet1 at a time."
And also kindly tell me, is there any other way with I can do the above
two
things i.e., without using macros.
Thanks once again.
Bye.
NAVEEN
"Norman Jones" wrote:
Hi Naveen,
1. How to print all/ some Odd pages or Even pages in Excel.
Gord Dibben (http://tinyurl.com/mszhb) posted the following macro:
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 you are not familiar with macros, you may wish to visit David
McRitchie's
'Getting Started With Macros And User Defined Functions' at:
http://www.mvps.org/dmcritchie/excel/getstarted.htm
2. How to print some specified pages only (ex: 1,5, 8 to 10).
Select the required sheets, by control-clicking them, and check the
'Active
sheets' option in the print dialog. Remember to remove the multi-sheet
selection - click an unselected sheet.
---
Regards,
Norman
|