Printing a letter from access

[ddennis]

Good day:

I am new to Access 2000. I have created a form where using a command button( A print letter button) will print a letter stored in Word.

Any ideas on how to accomplish this?

Many thanks in advance.

Dion

 

[bat17]

This code should do it, you will need to set a reference to theWord libary for it to work. open any module and Tools>references... Scroll dow and find "Microsoft Word 9.0 Object Libary" (number may vary) and select it.

Sub WordTest()
Dim appWord As Word.Application
Dim wdDoc As Word.Document

Set appWord = New Word.Application
' The path/name of the Word document goes here
Set wdDoc = appWord.Documents.Open("C:\Temp\Temp.doc")
wdDoc.PrintOut (False)
wdDoc.Close (False)
appWord.Quit
Set wdDoc = Nothing
Set appWord = Nothing
End Sub

HTH

Peter

 

[ddennis]

Peter:

Many, many thanks for the code. I will give it a try.

Dion

ray: