View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.newusers
Gord Dibben Gord Dibben is offline
external usenet poster
 
Posts: 22,906
Default Printe Odd Pages

Excel is not Word so you will have to do without some of the Word Processing
features of Word.

Printing odd pages or pages like 1,5,11,20 is beyond the capabilities of Excel.


Gord Dibben MS Excel MVP

On Mon, 7 Apr 2008 06:56:01 -0700, Prem Soni
wrote:

Thanks Mike!

But i want to know can i do it without this script as i can do the same in
MS-Word in print dialoug box.

Prem Soni

"Mike H" wrote:

Hi,

Right click the sheet tab on the page you want to print, view code and paste
this in and run it. Change start =1 to start = 2 to print even pages.

Sub printit()
Start = 1
Total = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
For Page = Start To Total Step 2
ActiveSheet.PrintOut from:=Page, To:=Page
Next
End Sub

Mike

"Prem Soni" wrote:

Hello All,

Can anybody tell me how can i take take printout only of Odd pages or Even
Pages or selected page like page number 1,5,11,20 ect. in Excel 2003.

Regards,
Prem Soni