See the article "Print all documents in a given folder to a single print
file" at:
http://www.word.mvps.org/FAQs/MacrosVBA/PrintAllDocsInFldr.htm
Replace
Application.PrintOut _
Background:=False, _
Append:=True, _
OutputFileName:="c:\myfile.prn", _
PrintToFile:=True, _
FileName:=MyPath & MyName
with
Application.PrintOut Background:=False
to print to the default printer
Also see the article "How to allow the user to browse to and select a
folder" at:
http://www.word.mvps.org/FAQs/MacrosVBA/BrowsDialog.htm
--
Hope this helps.
Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.
Doug Robbins - Word MVP
"Ed from AZ"
news:35deeaf5-6d2a-41b5-b05d-5de5649835b0@x41g2000hsb.googlegroups.com...
> I'm trying to write a macro that will let me find a folder and simply
> print each file in that folder to the default printer. The files are
> PDFs. Using the FileSystemObject, I can get the Folder and File
> objects. But I can't seem to find a "Print" method in there
> anywhere?? WHat do I use?
>
> Ed