I have WindowsXP/MediaCentre2005, and Word2003
(just upgraded from Word2000).

We print all our colour labels from Word using an
OKI colour printer.

After our upgrade to Word2003 it is necessary to
go to the "Page Setup" and format every label page
to the OKI printer's "Multipurpose Tray" and then
save the results, after which this is set
permanently.

This is all too hard, so could someone tell us a
way to do this operation "globally" for all the
documents we us for this printer.

There is nothing in the OKI printer documentation
about this.

Please help, Frank

For new labels change the setting in the label wizard options.

For existing label documents. The simplest plan would be to create a print
macro.
Change the 2 lines where shown and use this macro to print your labels.


Sub PrintLabelFeed()
Dim sCurrentPrinter As String
sCurrentPrinter = ActivePrinter
ActivePrinter = "OKI Color Printer" ' put the correct OKI printername here
With Options
.DefaultTray = "Tray 2" 'Put the required tray here
End With
Application.PrintOut FileName:=""
With Options
.DefaultTray = "Use printer settings"
End With
ActivePrinter = sCurrentPrinter
End Sub


--

Graham Mayor - Word MVP

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


Frank Martin wrote:
I have WindowsXP/MediaCentre2005, and Word2003
(just upgraded from Word2000).

We print all our colour labels from Word using an
OKI colour printer.

After our upgrade to Word2003 it is necessary to
go to the "Page Setup" and format every label page
to the OKI printer's "Multipurpose Tray" and then
save the results, after which this is set
permanently.

This is all too hard, so could someone tell us a
way to do this operation "globally" for all the
documents we us for this printer.

There is nothing in the OKI printer documentation
about this.

Please help, Frank

Thank you for this.
Regards,Frank



"Graham Mayor" wrote in message
...
For new labels change the setting in the label
wizard options.

For existing label documents. The simplest plan
would be to create a print macro.
Change the 2 lines where shown and use this
macro to print your labels.


Sub PrintLabelFeed()
Dim sCurrentPrinter As String
sCurrentPrinter = ActivePrinter
ActivePrinter = "OKI Color Printer" ' put the
correct OKI printername here
With Options
.DefaultTray = "Tray 2" 'Put the
required tray here
End With
Application.PrintOut FileName:=""
With Options
.DefaultTray = "Use printer settings"
End With
ActivePrinter = sCurrentPrinter
End Sub


--

Graham Mayor - Word MVP

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


Frank Martin wrote:
I have WindowsXP/MediaCentre2005, and Word2003
(just upgraded from Word2000).

We print all our colour labels from Word using
an
OKI colour printer.

After our upgrade to Word2003 it is necessary
to
go to the "Page Setup" and format every label
page
to the OKI printer's "Multipurpose Tray" and
then
save the results, after which this is set
permanently.

This is all too hard, so could someone tell us
a
way to do this operation "globally" for all the
documents we us for this printer.

There is nothing in the OKI printer
documentation
about this.

Please help, Frank