How to Print an existing Word doc (not a merged doc, simply text) ?

[Adam]

Hi all,

we have a document that I need to print out using a command button. the
document is a static one and doesn't require merging of any fields/data etc.

Does anyone know how I can achieve this ?

cheers,

Adam

 

[Albert D. Kallal]

Try:

dim WordApp as object

Set WordApp = CreateObject("Word.Application")
WordApp.Documents.Open("c:\path to your doc\thedoc.doc")
WordApp.ActiveDocument.PrintOut False
WordApp.ActiveDocument.Close False
WordApp.Quit
Set WordApp = Nothing