Basically I tend to put a reference to the Microsoft Word application this
saves me the hasle of creating the object. A disadvantage to this technique
is that Access can not automatically downgrade the word object if you used a
higher version of the word object.

The benefit is that you have all the properties and methods at hand when
writing code in VBA.

This is some Code which I used for a client probably this gives you some
ideas.
As you can see I set a document object which I can easily reference from Code.

Public Sub Translate(Template As String, SaveAs As String, RecordSource As
String)
Dim rs As New ADODB.Recordset
Dim i As Integer
Dim wrd  As New Word.Application

   rs.Open "SELECT * FROM [" & RecordSource & "]",
CurrentProject.Connection, adOpenForwardOnly, adLockReadOnly
   If Not rs.EOF Then
       Set doc = wrd.Documents.Open(Template)
       With doc.ActiveWindow
           .Selection.WholeStory
           .Selection.Find.ClearFormatting
           .Selection.Find.Replacement.ClearFormatting
           For i = 0 To rs.Fields.Count - 1
               With .Selection.Find
                   .Text = "<" & rs.Fields(i).Name & ">"
                   .Replacement.Text = Nz(rs.Fields(i), "")
                   .Forward = True
                   .Wrap = wdFindAsk
                   .Format = False
                   .MatchCase = False
                   .MatchWholeWord = False
                   .MatchWildcards = False
                   .MatchSoundsLike = False
                   .MatchAllWordForms = False
               End With
               .Selection.Find.Execute Replace:=wdReplaceAll
           Next i
       End With
       
       doc.SaveAs SaveAs
       
   End If
   
   Set doc = Nothing
   wrd.Quit
   Set wrd = Nothing
End Sub

Public