MovieChat Forums > Computers and Software > batch print Word files without markups

batch print Word files without markups


I need to print some paper which contains markups. But I don't want to print the markups in them.

I know I can unselect “Print Markup” option in “Print” . But in that way, I need open and print them one by one in Word. Is there any way I can try to print them without markups at once??



You can write VBA codes to do that for you. And I just find a macro which just can do that for you, see below:

Sub BatchPrintDocsWithoutComments()
Dim objDoc As Document
Dim strFile As String, strFolder As String

' Initialization
strFolder = InputBox("Enter folder path:")
strFile = Dir(strFolder & "*.docx", vbNormal)

While strFile <> ""
Set objDoc = Documents.Open(FileName:=strFolder & strFile)
Set objDoc = ActiveDocument

Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
Collate:=True, Background:=True, PrintToFile:=False, PrintZoomColumn:=0, _
PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0

strFile = Dir()
End Sub

And I also attach the link , hope it will help.

Good luck