View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Chip Pearson Chip Pearson is offline
external usenet poster
 
Posts: 7,247
Default Printing a Word Doc

Try

Dim WordApp As Object
Dim WordDoc As Object
Set WordApp = CreateObject("Word.Application")
WordApp.Visible = False
Set WordDoc = WordApp.documents.Open(ThisWorkbook.Path &
"\Instructions.doc")
WordDoc.PrintOut
WordDoc.Close savechanges:=False
WordApp.Quit


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com



"Brian Matlack"

wrote in message
news:Brian.Matlack.28y7wm_1149543606.4021@excelfor um-nospam.com...

Hi!
What type of code would I use to print a Word document by
clicking a
button or drawn object in an Excel worksheet? I do not want to
see the
document just open the Word application print the document
("Instructions") and close the Word application. The Word
document is
in the same file folder as the Excel workbook that is accessing
it.

Thanks for any and all help!!


--
Brian Matlack
------------------------------------------------------------------------
Brian Matlack's Profile:
http://www.excelforum.com/member.php...fo&userid=3508
View this thread:
http://www.excelforum.com/showthread...hreadid=548754