I have an AutoOpen macro assigned only to a specific word doc (not all
active templates etc). It changes the active printer for the document
at hand. However it also changes this printer to the default printer
for all other documents and programs. Shown below:


Sub AutoOpen()
'
' AutoOpen Macro
' Macro created 3/05/2006 by Crystle Fleper
'
ActivePrinter = "Panasonic WHOLESALE PRICELIST Printer"

End Sub

PLEASE HELP I'M GOING BANANAS!

In what way is the macro "assigned" to a specific document?



wrote in message
ups.com...
I have an AutoOpen macro assigned only to a specific word doc (not all
active templates etc). It changes the active printer for the document
at hand. However it also changes this printer to the default printer
for all other documents and programs. Shown below:


Sub AutoOpen()
'
' AutoOpen Macro
' Macro created 3/05/2006 by Crystle Fleper
'
ActivePrinter = "Panasonic WHOLESALE PRICELIST Printer"

End Sub

PLEASE HELP I'M GOING BANANAS!

When you change the printer in Word using a macro it changes the Windows
default printer. I believe this was fixed in Word 2003 but the fix may have
been earlier. What you need to do is instead intercept the print command in
your document with a macro. Have the macro get the current printer and save
it as a string. Switch the printer and print, then change it back.
--
Charles Kenyon

Word New User FAQ & Web Directory: http://addbalance.com/word

Intermediate User's Guide to Microsoft Word (supplemented version of
Microsoft's Legal Users' Guide) http://addbalance.com/usersguide

See also the MVP FAQ: http://word.mvps.org/FAQs/ which is awesome!

My criminal defense site: http://addbalance.com
--------- --------- --------- --------- --------- ---------
This message is posted to a newsgroup. Please post replies
and questions to the newsgroup so that others can learn
from my ignorance and your wisdom.


wrote in message
ups.com...
I have an AutoOpen macro assigned only to a specific word doc (not all
active templates etc). It changes the active printer for the document
at hand. However it also changes this printer to the default printer
for all other documents and programs. Shown below:


Sub AutoOpen()
'
' AutoOpen Macro
' Macro created 3/05/2006 by Crystle Fleper
'
ActivePrinter = "Panasonic WHOLESALE PRICELIST Printer"

End Sub

PLEASE HELP I'M GOING BANANAS!

By being saved in the document rather than the template or Normal.dot?

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
Word MVP FAQ site: http://word.mvps.org
Email cannot be acknowledged; please post all follow-ups to the newsgroup so
all may benefit.

"Jezebel" wrote in message
...
In what way is the macro "assigned" to a specific document?



wrote in message
ups.com...
I have an AutoOpen macro assigned only to a specific word doc (not all
active templates etc). It changes the active printer for the document
at hand. However it also changes this printer to the default printer
for all other documents and programs. Shown below:


Sub AutoOpen()
'
' AutoOpen Macro
' Macro created 3/05/2006 by Crystle Fleper
'
ActivePrinter = "Panasonic WHOLESALE PRICELIST Printer"

End Sub

PLEASE HELP I'M GOING BANANAS!

Possibly, but by the sounds of it the OP doesn't know enough about macros to
do that ...



"Suzanne S. Barnhill" wrote in message
...
By being saved in the document rather than the template or Normal.dot?

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
Word MVP FAQ site: http://word.mvps.org
Email cannot be acknowledged; please post all follow-ups to the newsgroup
so
all may benefit.

"Jezebel" wrote in message
...
In what way is the macro "assigned" to a specific document?



wrote in message
ups.com...
I have an AutoOpen macro assigned only to a specific word doc (not all
active templates etc). It changes the active printer for the document
at hand. However it also changes this printer to the default printer
for all other documents and programs. Shown below:


Sub AutoOpen()
'
' AutoOpen Macro
' Macro created 3/05/2006 by Crystle Fleper
'
ActivePrinter = "Panasonic WHOLESALE PRICELIST Printer"

End Sub

PLEASE HELP I'M GOING BANANAS!