Thanks for your help guitardave78. I have the following included and it seems to work. The only problem is that once it prints off once, if I move onto another record and try to print the letter for another client it fails to print a second time. It does input any text. It would appear that the bookmarks on the Word document are lost even though the microsoft support link you provided warns of this happening and provides a solution. Unfortunately the solution does not appear to work. I may have input the the line in the wrong place. Any help or advice greatly appreciated.
Private Sub MergeButton_Click()
On Error GoTo MergeButton_Err
Dim objWord As Word.Application
Set objWord = CreateObject("Word.Application"
With objWord
.Visible = True
.Documents.Open ("\\Rightway-3\C\My Merge Documents\Policy Documents to Client.doc"
'Move to each bookmark and insert text from the form.
.ActiveDocument.Bookmarks("Salutation2"

.Select
Selection.Text = (CStr(Forms!CLIENTS!Salutation))
'Add this line to reapply the bookmark name to the selection.
.ActiveDocument.Bookmarks.Add Name:="Salutation2", Range:=Selection.Range
.ActiveDocument.Bookmarks("FirstName"

.Select
Selection.Text = (CStr(Forms!CLIENTS!FirstNames))
'Add this line to reapply the bookmark name to the selection.
.ActiveDocument.Bookmarks.Add Name:="FirstName", Range:=Selection.Range
.ActiveDocument.Bookmarks("Surname2"

.Select
Selection.Text = (CStr(Forms!CLIENTS!Insured))
'Add this line to reapply the bookmark name to the selection.
.ActiveDocument.Bookmarks.Add Name:="Surname2", Range:=Selection.Range
.ActiveDocument.Bookmarks("Address"

.Select
Selection.Text = (CStr(Forms!CLIENTS!Address))
'Add this line to reapply the bookmark name to the selection.
.ActiveDocument.Bookmarks.Add Name:="Address", Range:=Selection.Range
.ActiveDocument.Bookmarks("Postcode"

.Select
Selection.Text = (CStr(Forms!CLIENTS!Postcode))
'Add this line to reapply the bookmark name to the selection.
.ActiveDocument.Bookmarks.Add Name:="Postcode", Range:=Selection.Range
.ActiveDocument.Bookmarks("Town"

.Select
Selection.Text = (CStr(Forms!CLIENTS!Town))
'Add this line to reapply the bookmark name to the selection.
.ActiveDocument.Bookmarks.Add Name:="Town", Range:=Selection.Range
.ActiveDocument.Bookmarks("Region"

.Select
Selection.Text = (CStr(Forms!CLIENTS!Region))
'Add this line to reapply the bookmark name to the selection.
.ActiveDocument.Bookmarks.Add Name:="Region", Range:=Selection.Range
.ActiveDocument.Bookmarks("ClientID"

.Select
Selection.Text = (CStr(Forms!CLIENTS!ClientID))
'Add this line to reapply the bookmark name to the selection.
.ActiveDocument.Bookmarks.Add Name:="ClientID", Range:=Selection.Range
.ActiveDocument.Bookmarks("CoverNo"

.Select
Selection.Text = (CStr(Forms!CAR!CoverNo))
'Add this line to reapply the bookmark name to the selection.
.ActiveDocument.Bookmarks.Add Name:="CoverNo", Range:=Selection.Range
.ActiveDocument.Bookmarks("Salutation"

.Select
Selection.Text = (CStr(Forms!CLIENTS!Salutation))
'Add this line to reapply the bookmark name to the selection.
.ActiveDocument.Bookmarks.Add Name:="Salutation", Range:=Selection.Range
.ActiveDocument.Bookmarks("Surname"

.Select
Selection.Text = (CStr(Forms!CLIENTS!Insured))
'Add this line to reapply the bookmark name to the selection.
.ActiveDocument.Bookmarks.Add Name:="Surname", Range:=Selection.Range
.ActiveDocument.Bookmarks("PolicyNumber"

.Select
Selection.Text = (CStr(Forms!CAR!PolicyNumber))
'Add this line to reapply the bookmark name to the selection.
.ActiveDocument.Bookmarks.Add Name:="PolicyNumber", Range:=Selection.Range
.ActiveDocument.Bookmarks("Make"

.Select
Selection.Text = (CStr(Forms!CAR!Make))
'Add this line to reapply the bookmark name to the selection.
.ActiveDocument.Bookmarks.Add Name:="Make", Range:=Selection.Range
.ActiveDocument.Bookmarks("Model"

.Select
Selection.Text = (CStr(Forms!CAR!Model))
'Add this line to reapply the bookmark name to the selection.
.ActiveDocument.Bookmarks.Add Name:="Model", Range:=Selection.Range
.ActiveDocument.Bookmarks("Administrator"

.Select
Selection.Text = (CStr(Forms!CAR!Administrator))
'Add this line to reapply the bookmark name to the selection.
.ActiveDocument.Bookmarks.Add Name:="Administrator", Range:=Selection.Range
End With
objWord.ActiveDocument.PrintOut Background:=False
objWord.ActiveDocument.Close SaveChanges:=wdDoNotSaveChanges
objWord.Quit
Set objWord = Nothing
Exit Sub
MergeButton_Err:
If Err.Number = 94 Then
objWord.Selection.Text = ""
Resume Next
End If
Exit Sub
End Sub