Mailmerge to Word - How to suppress message...
From: Linda (anonymous_at_discussions.microsoft.com)
Date: 03/04/04
- Next message: Jedster: "Open Calendar object at today's date"
- Previous message: Linda: "RE: Automation Error - RPC Server is unavailble."
- Next in thread: Dave Jones: "Re: Mailmerge to Word - How to suppress message..."
- Reply: Dave Jones: "Re: Mailmerge to Word - How to suppress message..."
- Messages sorted by: [ date ] [ thread ]
Date: Thu, 4 Mar 2004 02:45:45 -0800
I have written the following routine that performs a
mailmerge to word. This works fine execpt that my users
are always getting the following error message:
"Word is currently printing. Quitting Word will Cancel all
Print Jobs. Do you want to Quit Word?".
Is there any way to supress this message? - TIA.
Set objWord = CreateObject("Word.Application")
DoCmd.Hourglass True
Echo True, "Printing Memorandum...."
objWord.Documents.Open
("C:\temp\outstandingbill2.doc")
objWord.Application.Visible = False
XOriginalPrinter = objWord.Application.ActivePrinter
objWord.Application.ActivePrinter = "\\SERVER01
\PRINT01"
objWord.ActiveDocument.PrintOut
objWord.Application.ActivePrinter = XOriginalPrinter
objWord.ActiveDocument.Saved = True
objWord.Quit
Set objWord = Nothing
DoCmd.Hourglass False
- Next message: Jedster: "Open Calendar object at today's date"
- Previous message: Linda: "RE: Automation Error - RPC Server is unavailble."
- Next in thread: Dave Jones: "Re: Mailmerge to Word - How to suppress message..."
- Reply: Dave Jones: "Re: Mailmerge to Word - How to suppress message..."
- Messages sorted by: [ date ] [ thread ]
Relevant Pages
|