LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #3   Report Post  
Senior Member
 
Posts: 118
Default

Quote:
Originally Posted by Claus Busch View Post
Hi,

Am Fri, 4 Apr 2014 02:57:02 +0100 schrieb sumesh56:

I have an excel sheet of 154 pages. I want to print only pages 1,51
and 154. what i am doing is print pages one by one.first give the
command to page i then 51 then 154. how can i give the command in one go
so that it is printed the required pages only.


try it with a macro. Modify the print array to your expected pages:

Sub PrintPages()
Dim arrPrint As Variant
Dim i As Long

arrPrint = Array(1, 3, 7)

For i = LBound(arrPrint) To UBound(arrPrint)
ActiveSheet.PrintOut from:=arrPrint(i), _
to:=arrPrint(i), copies:=1
Next
End Sub


Regards
Claus B.
--
Vista Ultimate SP2 / Windows7 SP1
Office 2007 Ultimate SP3 / 2010 Professional
thanks for the response. can u modify it to display how if i want to print pages 1,51 and 152.
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Number of pages in worksheet doesn't match Print Preview pages delru Excel Discussion (Misc queries) 2 May 10th 10 10:08 PM
how do you print 2 pages per worksheet Joe Excel Discussion (Misc queries) 2 June 11th 09 11:23 AM
how do you print 2 pages per worksheet Joe Excel Discussion (Misc queries) 0 June 10th 09 07:26 PM
Why does my worksheet print on more pages when scaled down to 10%? what the heck! Excel Discussion (Misc queries) 0 March 4th 08 10:44 PM
How to print a worksheet but number the pages by workbook Frank Clayton Excel Discussion (Misc queries) 2 January 10th 05 10:52 PM


All times are GMT +1. The time now is 07:09 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"