Problème publipostage ACCESS - Word

Bonjour,

Voilà je suis novice en code VB mais j'aimerais faire un truc qui me simplifierais la vie !!
J'ai une base de données où nous gérons nos adhérents (sous ACCESS), à partir d'un formulaire j'aimerais pouvoir générer un courrier automatiquement, juste en cliquant sur un bouton. Il faut que ce courrier ne sorte que pour l'adhérent sur lequel mon formulaire est ouvert.

Donc j'ai créée un module avec cette commande : nom MergeIt ?

Option Compare Database
Sub Publipostage_Vers_Document()
Dim wdApp As Word.Application
Dim strCheminDoc As String, strCheminFusion As String
Dim strSQL As String
strCheminDoc = "C:\Documents and Settings\FUSION.doc"
strCheminFusion = "C:\Documents and Settings\RESULTAT.doc"
strSQL = "SELECT * FROM [INTRO]"
Set wdApp = New Word.Application
With wdApp
.Documents.Open strCheminDoc
With .ActiveDocument.MailMerge
.OpenDataSource Name:=CurrentProject.FullName, _
SQLStatement:=strSQL, _
ReadOnly:=True
.Destination = wdSendToNewDocument
.Execute
End With

.ActiveDocument.SaveAs FileName:=strCheminFusion
.Quit SaveChanges:=wdDoNotSaveChanges
End With
Set wdApp = Nothing
End Sub

Puis sur mon formulaire j'ai créée un bouton avec comme commande

Option Compare Database
Private Sub cmdPublipostage_Click()

Call MergeIt

End Sub


Mais cela ne marche pas !
J'ai apparemment réussi à le faire marcher une fois mais Word ne s'était pas ouvert il m'avait juste créé un nouveau fichier.

D'avance merci, pour vos éclairages.

Je suis en WORD2003 - Visual Basic6.3 et ACCESS2002