Group:  Microsoft Word » microsoft.public.word.docmanagement
Thread: Printing Alternate Pages

Geek News

Printing Alternate Pages
Joe Perfiry 12/13/2008 10:12:00 AM
I have a large document (296 pages) and I want to print every other page on
to headed paper. So page 1 goes to one cassette page 2 to another and this
repeats etc. Is this possible and how?
Re: Printing Alternate Pages
"Graham Mayor" <gmayor[ at ]REMOVETHISmvps.org> 12/13/2008 12:24:06 PM
If this is a merged letter document then if the merge source document had a
different first page tray setting in page setup then that information should
be retained, but the printer will probably require you to send each letter
as a separate print job. Fellow MVP Doug Robbins has produced a macro for
this which you will find listed under the heading Split a merged document to
the printer with each 'letter' treated as a separate print task at
http://www.gmayor.com/individual_merge_letters.htm


For other documents, the following macro should work. Note that the tray ID
numbers are printer specific. See http://www.gmayor.com/fax_from_word.htm
which explains how to establish the tray ID numbers for your printer -
replace the tray IDs in the following macro as necessary:

Sub TwoTrays()
Dim sTray As Integer
sTray = Options.DefaultTrayID
Dim sPage As Long
With ActiveDocument
Selection.EndKey wdStory
For i = 1 To Selection.Information(wdActiveEndPageNumber)
sPage = i Mod 2
If sPage = 1 Then
Options.DefaultTrayID = 261 'Set the odd page trayID number here
Else
Options.DefaultTrayID = 260 'Set the even page trayID number
here
End If
ActiveDocument.PrintOut _
Range:=wdPrintRangeOfPages, _
Pages:=format(i), _
Copies:=1
Next i
Options.DefaultTrayID = sTray
End With
End Sub


--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

Joe Perfiry wrote:
[Quoted Text]
> I have a large document (296 pages) and I want to print every other
> page on to headed paper. So page 1 goes to one cassette page 2 to
> another and this repeats etc. Is this possible and how?


RE: Printing Alternate Pages
Joe Perfiry 12/13/2008 8:41:00 PM
Hi Graham,
Thanks for your input. No it is not a merge document. It is a simple 296
page document with every other page needing to be plain. Every other headed.
So if you like odd plain and even headed. Hence the need for different trays.
Does this macro work therefore?

"Joe Perfiry" wrote:

[Quoted Text]
> I have a large document (296 pages) and I want to print every other page on
> to headed paper. So page 1 goes to one cassette page 2 to another and this
> repeats etc. Is this possible and how?
Re: Printing Alternate Pages
grammatim <grammatim[ at ]verizon.net> 12/13/2008 9:25:10 PM
Could you perhaps put the information that's on the "headed" paper
into a header within the document itself? The company logo, or
whatever it is that needs to be repeated? (Use "Different Odd and
Even" headers.)

On Dec 13, 3:41 pm, Joe Perfiry <JoePerf...[ at ]discussions.microsoft.com>
wrote:
[Quoted Text]
> Hi Graham,
> Thanks for your input. No it is not a merge document. It is a simple 296
> page document with every other page needing to be plain. Every other headed.
> So if you like odd plain and even headed. Hence the need for different trays.
> Does this macro work therefore?
>
>
>
> "Joe Perfiry" wrote:
> > I have a large document (296 pages) and I want to print every other page on
> > to headed paper. So page 1 goes to one cassette page 2 to another and this
> > repeats etc. Is this possible and how?-
Re: Printing Alternate Pages
"Suzanne S. Barnhill" <sbarnhill[ at ]mvps.org> 12/14/2008 12:20:35 AM
If it actually alternates predictably, you could print all the odd pages,
then the even pages.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
http://word.mvps.org

"Joe Perfiry" <JoePerfiry[ at ]discussions.microsoft.com> wrote in message
news:BA6957F3-9112-46BE-B3D1-A2A21CA6823F[ at ]microsoft.com...
[Quoted Text]
> Hi Graham,
> Thanks for your input. No it is not a merge document. It is a simple 296
> page document with every other page needing to be plain. Every other
> headed.
> So if you like odd plain and even headed. Hence the need for different
> trays.
> Does this macro work therefore?
>
> "Joe Perfiry" wrote:
>
>> I have a large document (296 pages) and I want to print every other page
>> on
>> to headed paper. So page 1 goes to one cassette page 2 to another and
>> this
>> repeats etc. Is this possible and how?
>


Re: Printing Alternate Pages
"Graham Mayor" <gmayor[ at ]REMOVETHISmvps.org> 12/14/2008 7:38:17 AM
I have not tested it with your printer, but it should work if you insert the
correct tray code numbers where indicated.
It treats each page as a separate print job and directs that page to the
appropriate tray depending on whether the page number is odd or even. Try it
with a smaller document.

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>



Joe Perfiry wrote:
[Quoted Text]
> Hi Graham,
> Thanks for your input. No it is not a merge document. It is a simple
> 296 page document with every other page needing to be plain. Every
> other headed. So if you like odd plain and even headed. Hence the
> need for different trays. Does this macro work therefore?
>
> "Joe Perfiry" wrote:
>
>> I have a large document (296 pages) and I want to print every other
>> page on to headed paper. So page 1 goes to one cassette page 2 to
>> another and this repeats etc. Is this possible and how?


Home | Search | Terms | Imprint Contact
Newsgroups Reader - provided by WiredBox.Net