Print Document (no markups)

macropod · #2 08-08-2012, 07:04 PM

Hi Stanza_chad,

Your macro should simply print the document without invoking the Print dialogue. It also has no effect on that dialogue.

Ordinarily, if you print a document containing comments, you'll get a warning. The following modifications will suppress that warning:

Code:

Sub PrintDoc()
Dim bOption As Boolean
bOption = Options.WarnBeforeSavingPrintingSendingMarkup
Options.WarnBeforeSavingPrintingSendingMarkup = False
Application.PrintOut Range:=wdPrintAllDocument, _
  Item:=wdPrintDocumentContent, Copies:=1
Options.WarnBeforeSavingPrintingSendingMarkup = bOption
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Print document except first page	nkg	Word VBA	5	05-05-2012 03:57 AM
Mutliple copies 167 print as one document	John-N	Mail Merge	5	02-19-2012 07:15 PM
Save and send markups	ceocast	Word	1	12-09-2010 10:39 AM
How can I print out the document as follow?	turbomen	Project	1	05-23-2010 07:24 AM
When I print the document changes layout	cooney	Word	0	03-01-2010 12:17 AM