batch print

[Othermatt]

Does anybody know how to batch print a folder full of Word docs
without negotiating that confounding print dialog box?

Thanks!

 

[Othermatt]

Does anybody know how to batch print a folder full of Word docs
without negotiating that confounding print dialog box?

Thanks!

This is a workable macro:

Sub batch_print()
'
' batch_print Macro
' Macro created 5/26/07 by Matthew Smith
'

For I = 1 To 110
ActiveDocument.PrintOut
'Dialogs(wdDialogFilePrint).Show
ActiveWindow.Close
Next I
End Sub

It's not quite the elegant solution I am seeking, though. I was
hoping to drag and drop onto a droplet.

 

[CyberTaz]

Hi Matt -

Unless you've not disclosed a specific _need_ to do this programmatically
here are a couple of ideas:

1- Navigate to the folder in a Finder window rather than from within Word,
Command+A to select all, then Control-Click & choose Print from the
contextual menu,

2- Use Printer Setup Utility to create one or more Desktop Printer Icons -
you can create one for your regular printer, one for PDFs, etc. - select
your docs in Finder & drag 'em to the icon.

HTH |:>)
Bob Jones
[MVP] Office:Mac

 

[Othermatt]

Hi Matt -

Unless you've not disclosed a specific _need_ to do this programmatically
here are a couple of ideas:

1- Navigate to the folder in a Finder window rather than from within Word,
Command+A to select all, then Control-Click & choose Print from the
contextual menu,

2- Use Printer Setup Utility to create one or more Desktop Printer Icons -
you can create one for your regular printer, one for PDFs, etc. - select
your docs in Finder & drag 'em to the icon.

HTH |:>)
Bob Jones
[MVP] Office:Mac

Bob,

Neither of these approaches work with MS Word files on a Mac. I know
it works with every other file type, and I know it works on a PC. The
problem is that each file opens the print dialogue window which must
be negotiated to continue.

Thanks anyway,
M

 

[Othermatt]

Sorry Matt - misunderstood the point. Based on how Word works I'm not sure
how you can bypass the dialog altogether other than what you're already
trying. I'm not sure whether it can be done by Apple Script or not.

Regards |:>)
Bob Jones
[MVP] Office:Mac

Oh, this is good. I just received this AppleScript from a wise and
kind individual in the Apple Discussions. The link to the discussion
is:

http://discussions.apple.com/message.jspa?messageID=4621548

The AppleScript (which I'm guessing invokes visual basic?) follows:

on run
display dialog "Print out Word 2004 documents" & return & return & ¬
"Drag Word documents (xxx.doc) onto this droplet to print out each
one. " buttons {"OK"} default button 1
end run

on open the_Droppings
repeat with a_Doc in the_Droppings
tell application "Finder" to open file a_Doc
tell application "Microsoft Word"
repeat until name of active document is ((info for a_Doc)'s name as
string)
end repeat
print out active document print copies 1
close active document saving no
end tell
end repeat
end open


Regards!
Matthew