Document linked to Printer in Microsoft Word

ADD Balance - trademark of Charles Kenyon, Attorney at Law and Webmaster. Frequently Asked Questions - Help
Microsoft Word - Frequently Asked Questions - click to go to the question list.

on ADD Balance by Madison Wisconsin Criminal Defense Lawyer Charles Kenyon

Many people visit this site and use the information it contains. It costs money to keep on line and effort to update.
If you have received assistance here
please consider making a donation if you can.

 
Thank you. Charles Kenyon

Thank you for the suggestions. ("Smilies" from Woody's Lounge.) Click to go to Lounge. with input and suggestions from many on Thank you for the suggestions. ("Smilies" from Woody's Lounge.) Click to go to Lounge.
the Microsoft Newsgroups and at Woody's Lounge 

Click here to skip past FAQ questions list and other info and go directly to the start of this topic.

Search the FAQ site on Google.

Remember to Refresh your page. [F5].

Home
Word Tutorial - Intermediate
Legal Users Guide to Word
Downloads
Books about Microsoft Word - Newsgroup suggestions
Links
Web Resources for Microsoft Word

 

Using Date Fields in Microsoft Word
Calculated Dates
Booklet Formatting and Printing in Microsoft Word
Changing the Default Font in Microsoft Word
Document linked to Printer in Microsoft Word
Fonts Missing from Menu in Microsoft Word
How can I get a different header / footer on the second page?
Heading? Header? Microsoft Word Help
More on Headers and Footers in Word
Letterhead
I want the filename in the footer of every document.
Margins Missing - White Space
Mapped Content Controls and Document Properties
Moving/Reorganizing Pages in Microsoft Word
Print Preview in Microsoft Word
Weird Lines and Borders
Macros and VBA
Malicious Macros vba in Microsoft Word
Master Documents Feature in Microsoft Word
A Back CoverPage in Microsoft Word
Normal Template in Microsoft Word - How to Open or Find the Normal Template
My docs open in the wrong program! Re-registering Word using the commandline.
Moving (Sharing) Customizations in Microsoft Word
Global StyleSheet?
MVP means?
Naming Files - A System is the Key
Posting tips in the Microsoft Word Forums
Getting rid of that (*)#"@^ paperclip! - Taming the Office Assistant
Page X of Y doesn't work in Microsoft Word!
Save Changes to the Global Template? Keeps Popping Up
Templates in Microsoft Word
Global Templates
Too Many Icons on the Taskbar in Microsoft Word 2000
Getting Rid of the Web Toolbar in Microsoft Word
Word for Word Perfect Users
Favorite Documents Menu
Work Menu in Microsoft Word
Spell Check Dialog Instead of Editor
Templates Menu in Microsoft Word
What books have been recommended about Microsoft Word?
Where can I find more templates?
Word Links

 

Q: Can I assign a printer to a document so that it will use the printer I want?

A: Not directly. What I've done instead is implement a floating toolbar button that is enabled and made visible by the documents going to the special printer. In my case, I use one printer just for envelopes so it is in my envelope templates.

The macro called by it collects the current printer setting in a variable, changes the printer to the envelope printer, prints the document, and then changes the printer setting back.

The macros and toolbar button are stored in a global template and called by the document template.

Print macro in global template:

SubEnvPrint ()

Dim sMyActivePrinter As String

Selection.Collapse

sMyActivePrinter = ActivePrinter

ActivePrinter = "HP LaserJet IIIP"

Application.PrintOut FileName:="", _

Range:=wdPrintCurrentPage, Item:= _

wdPrintDocumentContent, Copies:=1, _ 

Pages:="", PageType:=wdPrintAllPages, _

Collate:=True, Background:=True, _

PrintToFile:=False, PrintZoomColumn:=0, _

PrintZoomRow:=0, PrintZoomPaperWidth:=0, _

PrintZoomPaperHeight:=0

ActivePrinter = sMyActivePrinter

End Sub

Also in the global:

Sub EnvelopeOpen()

Application.CommandBars("Envelope Toolbar").Enabled = True

Application.CommandBars("Envelope Toolbar").Visible = True

End Sub

The envelope template has AutoNew and AutoOpen macros:

Sub AutoNew()

Application.Run MacroName:="EnvelopeOpen"

End Sub

Sub AutoOpen()

Application.Run MacroName:="EnvelopeOpen"

End Sub

In the AutoExec macro for the global are the following:

Word.CommandBars("Envelope Toolbar").Enabled = False

Word.CommandBars("Envelope Toolbar").Visible = False

This keeps the toolbar from being in the way unless it is needed. I could hide it again when the document is closed but it's just as easy to click on the close box on the toolbar.

This way, I don't end up sending my letters to the envelope printer because the printer settings go back to what they were. Also, this way the bulk of the code is centrally located so if I change the printer I only need to change the code in one spot rather than in multiple envelope templates.

If needed, I suppose you could have the macro call up the print dialog instead of printing.

For more on global templates see: http://www.addbalance.com/usersguide/templates.htm 

For instructions on inserting these macros in your documents or templates see: Macros and VBA

This page viewed Hit Counter times since 13 April 2004.

Many people visit this site and use the information it contains.
It costs money to keep on line and effort to update.
If you have received assistance here
please consider making a donation if you can.

 
Thank you. ckk

Copyright 2000-2024 Charles Kyle Kenyon

FAQ provided as an adjunct / hobby as a part of my web site as a criminal defense lawyer.

Smile! Bumper stickers and jokes.

Using Date Fields in Microsoft Word
Calculated Dates
Booklet Formatting and Printing in Microsoft Word
Changing the Default Font in Microsoft Word
Document linked to Printer in Microsoft Word
Fonts Missing from Menu in Microsoft Word
How can I get a different header / footer on the second page?
Heading? Header? Microsoft Word Help
More on Headers and Footers in Word
Letterhead
I want the filename in the footer of every document.
Margins Missing - White Space
Mapped Content Controls and Document Properties
Moving/Reorganizing Pages in Microsoft Word
Print Preview in Microsoft Word
Weird Lines and Borders
Macros and VBA
Malicious Macros vba in Microsoft Word
Master Documents Feature in Microsoft Word
A Back CoverPage in Microsoft Word
Normal Template in Microsoft Word - How to Open or Find the Normal Template
My docs open in the wrong program! Re-registering Word using the commandline.
Moving (Sharing) Customizations in Microsoft Word
Global StyleSheet?
MVP means?
Naming Files - A System is the Key
Posting tips in the Microsoft Word Forums
Getting rid of that (*)#"@^ paperclip! - Taming the Office Assistant
Page X of Y doesn't work in Microsoft Word!
Save Changes to the Global Template? Keeps Popping Up
Templates in Microsoft Word
Global Templates
Too Many Icons on the Taskbar in Microsoft Word 2000
Getting Rid of the Web Toolbar in Microsoft Word
Word for Word Perfect Users
Favorite Documents Menu
Work Menu in Microsoft Word
Spell Check Dialog Instead of Editor
Templates Menu in Microsoft Word
What books have been recommended about Microsoft Word?
Where can I find more templates?
Word Links

Click to return to table of contents page of Intermediate User's Guide to Microsoft Word.Click to go to Microsoft Word new users frequently asked questions site in a new browser window.
(Intermediate Users' Guide) - - - - - - - - - - - - - - - - - - -  (Questions List)

Home
Word Tutorial - Intermediate
Legal Users Guide to Word
Downloads
Books about Microsoft Word - Newsgroup suggestions
Links
Web Resources for Microsoft Word