Prev: Microsoft Word 2007
Next: Print Frist 2 pages in First Page Tray & others in other pages
From: Senthil on 4 Jun 2010 06:27
I use one tray for Headed Paper and another for plain paper.
Using macro i print first page of the document to the headed paper and
remaining pages in plain paper tray correctly.

Now to be more eco-freindly, to avoid wastage of papers, i need to print the
second page of the document to the headed paper back side.

So ideally i need to Print Frist Two pages in First Page Tray & reamining
pages in other pages tray (which is already duplexed).

Need to if this is possible.

Code
--declare
Dim sPrinterName$
Dim sPortName$
Dim nFirstPageTray
Dim nOtherPagesTray

-- assignment
sPrinterName$ = 'assign print name
sPortName$ = 'assign port name
nFirstPageTray = ' assign "First Page Tray"
nOtherPagesTray = ' assign "Other Pages Tray"

--Set print details
WordBasic.FilePrintSetup Printer:=sPrinterName$ + " on " + sPortName$,
DoNotSetAsSysDefault:=1

--Set the trays
WordBasic.FilePageSetup applypropsto:=4, FirstPage:=nFirstPageTray,
OtherPages:=nOtherPagesTray

--Print the ducment
WordBasic.FilePrint Background:=1

Thanks
Senthil
From: Graham Mayor on 4 Jun 2010 07:08
Instead of setting different first page - print the first two pages to tray1
and the rest to tray2. If the whole is duplexed it should work. For macro
code to switch trays see http://www.gmayor.com/fax_from_word.htm

I believe all trees used for paper are from sustainable forests planted for
the purpose of creating paper and as more trees should be better, it could
be argued that by not using paper you are adding to the reduction in tree
numbers planted - albeit in a tiny way :)

You would also be helping reduce available jobs.


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

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



"Senthil" <Senthil(a)discussions.microsoft.com> wrote in message
news:C0520B52-6EB9-4A86-B3E8-BA597E67E281(a)microsoft.com...
>I use one tray for Headed Paper and another for plain paper.
> Using macro i print first page of the document to the headed paper and
> remaining pages in plain paper tray correctly.
>
> Now to be more eco-freindly, to avoid wastage of papers, i need to print
> the
> second page of the document to the headed paper back side.
>
> So ideally i need to Print Frist Two pages in First Page Tray & reamining
> pages in other pages tray (which is already duplexed).
>
> Need to if this is possible.
>
> Code
> --declare
> Dim sPrinterName$
> Dim sPortName$
> Dim nFirstPageTray
> Dim nOtherPagesTray
>
> -- assignment
> sPrinterName$ = 'assign print name
> sPortName$ = 'assign port name
> nFirstPageTray = ' assign "First Page Tray"
> nOtherPagesTray = ' assign "Other Pages Tray"
>
> --Set print details
> WordBasic.FilePrintSetup Printer:=sPrinterName$ + " on " + sPortName$,
> DoNotSetAsSysDefault:=1
>
> --Set the trays
> WordBasic.FilePageSetup applypropsto:=4, FirstPage:=nFirstPageTray,
> OtherPages:=nOtherPagesTray
>
> --Print the ducment
> WordBasic.FilePrint Background:=1
>
> Thanks
> Senthil


 | 
Pages: 1
Prev: Microsoft Word 2007
Next: Print Frist 2 pages in First Page Tray & others in other pages