You can assign this code to the click event of a button.
Private Sub Command0_Click()
Dim oWord As Object
Dim oDoc As Object
Set oWord = CreateObject("Word.Application")
'correct the path and document name below.
Set oDoc = oWord.documents.Open("[path to document]\document.doc")
'if you are going to create a new document from a template you would use
this code:
'set oDoc = oWord.documents.Add("[path and name of template]")
oWord.Visible = True
End Sub
Harold Kless, MCSD
Support Professional
Microsoft Technical Support for Business Applications
(e-mail address removed)
--
This posting is provided "AS IS" with no warranties, and confers no rights.
Use of included script samples are subject to the terms specified at
http://www.microsoft.com/info/cpyright.htm
Note: For the benefit of the community-at-large, all responses to this
message are best directed to the newsgroup/thread from which they
originated.