Advertisement

There's no such thing as a stupid question, but they're the easiest to answer.
Login
Search

Advertisement

Business Applications Business Applications
Search Search
Search for:
Tech Support Guy > > >

Solved: Excel 2007 need to print odd/even pages


(!)

dave.23's Avatar
dave.23 dave.23 is offline
Member with 79 posts.
THREAD STARTER
 
Join Date: Jan 2005
Experience: Intermediate
24-Apr-2010, 04:24 AM #1
Question Solved: Excel 2007 need to print odd/even pages
Hi can any one tell me how to print only odd or even pages in excel 2007.
I've seen people talk about macro's but i don't have a clue so a basic step by step would be much appreciated.

Thanks

Dave
etaf's Avatar
etaf   (Wayne) etaf is online now
Computer Specs
Moderator with 53,060 posts.
 
Join Date: Oct 2003
Location: Surrey, UK
24-Apr-2010, 04:57 AM #2
just an idea, when you go to print - you can usually select the pages to print (you have a choice of selection or pages on most printers ) - if you type in the pages section 1,3,5,7,9 etc for ODD and 2,4,6,8 etc for even - upto the maximum number of pages you have - it may save some time in macros etc
It works for other documents - just never tried with excel, BUT if you set up the page in excel first dont see why not - Dont have Excel 2007 and I'm not near my 2003 version right now.
maybe worth a try
__________________
Wayne
Please let us know what the final solution was to any problem posted
dave.23's Avatar
dave.23 dave.23 is offline
Member with 79 posts.
THREAD STARTER
 
Join Date: Jan 2005
Experience: Intermediate
24-Apr-2010, 05:14 AM #3
I don't have the option to do that i can only input a range from say 1 to 49 but it print every page not just the odd ones see pic

hi-tech's Avatar
hi-tech hi-tech is offline
Junior Member with 22 posts.
 
Join Date: Apr 2010
Experience: in some areas
24-Apr-2010, 05:16 AM #4
Smile Odd_Even_Print
Follow this steps:
  1. Open your document and click on the "View" Tab
  2. Click on the "Macro" button in the right top corner.
  3. In the Box that appears next type "Odd_Even_Print" as name and click "Create"; a Visual Basic editor page will open
  4. Copy/Paste the rest of the script given below between "Sub Odd_Even_Print()" and "End Sub" ( don't need to save or anything just close it and save the excel file)
  5. When you need to print repete steps 1 & 2 select the macro and click "Run"
  6. In the box that appears next Type 1 for odd and 2 for even.






Sub Odd_Even_Print()
Dim Totalpages As Long
Dim StartPage As Long
Dim Page As Integer


StartPage = InputBox("Enter 1 for Odd, 2 for Even")

Totalpages = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
For Page = StartPage To Totalpages Step 2
ActiveSheet.PrintOut from:=Page, To:=Page, _
Copies:=1, Collate:=True
Next
End Sub
dave.23's Avatar
dave.23 dave.23 is offline
Member with 79 posts.
THREAD STARTER
 
Join Date: Jan 2005
Experience: Intermediate
24-Apr-2010, 05:34 AM #5
Cheers that's working great.
Is there any way i can change the printing order?
if i print the odd pages it prints 1,3,5ect but in order for me to print 2,4,6ect on the other side of the page i'll have to manually change the order of 1,3,5 when they come out of the printer, if you understand what i mean.
hi-tech's Avatar
hi-tech hi-tech is offline
Junior Member with 22 posts.
 
Join Date: Apr 2010
Experience: in some areas
24-Apr-2010, 07:01 AM #6
Odd_Even_Print_Reverse
That's being Greedy

Add the following script after the earlier script.

You have to mention the last page number here, ie say you have 50 pages then, you'll have to type in 49 for odd and 50 for even.

Sub Odd_Even_Print_Reverse()
Dim StartPage As Long
Dim EndPage As Long
Dim Page As Integer


EndPage = InputBox("Enter the last page number")

StartPage = 1
For Page = EndPage To StartPage Step -2
ActiveSheet.PrintOut from:=Page, To:=Page, _
Copies:=1, Collate:=True
Next

End Sub
dave.23's Avatar
dave.23 dave.23 is offline
Member with 79 posts.
THREAD STARTER
 
Join Date: Jan 2005
Experience: Intermediate
24-Apr-2010, 07:33 AM #7
You're the man thanks
As Seen On

BBC, Reader's Digest, PC Magazine, Today Show, Money Magazine
WELCOME TO TECH SUPPORT GUY!

Are you looking for the solution to your computer problem? Join our site today to ask your question. This site is completely free -- paid for by advertisers and donations.

If you're not already familiar with forums, watch our Welcome Guide to get started.


(clock)
THIS THREAD HAS EXPIRED.
Are you having the same problem? We have volunteers ready to answer your question, but first you'll have to join for free. Need help getting started? Check out our Welcome Guide.

Search Tech Support Guy

Find the solution to your
computer problem!




Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
 
Thread Tools


Similar Threads
Title Thread Starter Forum Replies Last Post
Excel 2007 Macro to Send Reminder Email desantisj Business Applications 2 18-Nov-2009 06:58 PM
Solved: Excel 2007 printing filtered worksheets problem rsdr Business Applications 1 21-Jul-2009 08:53 AM
Excel 2007 Printing Error zipit Business Applications 0 11-Jun-2009 11:02 AM
Solved: Excel 2007 slow to load, hangs becktholomew Business Applications 2 30-Apr-2009 08:23 AM
Excel 2007 - Printing Charts on 11 x 17 paper gcalhoun Business Applications 2 20-Apr-2009 10:48 AM

WELCOME
You Are Using: Server ID
Trusted Website Back to the Top ↑

Content Relevant URLs by vBSEO 3.3.2