Word retains printer settings

macropod · #4 01-06-2011, 01:50 AM

Hi Nathalie,

Try adding the following macro to Word's 'Normal' template:

Code:

Sub FilePrint()
Dim strPrtNm As String
strPrtNm = ActivePrinter
With Application.Dialogs(wdDialogFilePrint)
  If .Show = -1 Then ActiveDocument.PrintOut
End With
ActivePrinter = strPrtNm
End Sub

To see how to do this, see: www.gmayor.com/installing_macro.htm

The macro intercepts the File|Print dialog box. In doing so, it captures the curent printer's name, allows the user to change the printer & print, then restores the original printer. Since the first printer captured should be the default one, that's what it'll keep restoring. A bit of a pain if you want to send a series of documents to a different printer, but it should resolve the other difficulties.

Thread Tools
Show Printable Version Email this Page
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
word changes settings while copiing texts	marja	Word	2	11-29-2010 01:17 PM
2 printer icons	Topazdan	Office	3	05-18-2010 01:35 AM
Default printer disappears in Word	kangourou77	Word	0	02-11-2010 06:31 AM
word looks for printer when opening rtf files	elvagreg	Word	2	05-14-2009 11:21 PM
Word crashes trying to connect to printer	raymondvillain	Word	0	01-15-2009 08:11 PM