VBA : export objet OLE

Bonjour

Je dois réaliser une macro sous Access, mais j’ai un problème.

La macro doit :
Récupérer un champ dans une table de type « integer » : INDEX_EXAMEN
Et un autre champs de type « objet OLE » (Microsoft Word) : COMPTE-RENDU

Ensuite je dois créer un fichier word avec le nom INDEX_EXAMEN
Et dans lequel il y aura le contenu de l’objet OLE ( un fichier word )

Ma requête est bonne, mais je ne sais pas comment récupérer l’objet OLE et ensuite faire que cette objet devienne un fichier word

Dim NewDoc As String

Set db = CurrentDb
sql = "SELECT [COMPTE-RENDU].INDEX_EXAMEN, [COMPTE-RENDU].[COMPTE-RENDU] FROM [COMPTE-RENDU] WHERE ((([COMPTE-RENDU].[ID_COMPTE-RENDU])<50));"
' Ouverture du recordset
Set rst = db.OpenRecordset(sql, dbOpenDynaset)

rst.MoveNext
While rst.EOF <> True
NewDoc = rst.Fields(0).Value

J’ai testé 36000 méthodes vue sur le net pour enregistrer des objet OLE, mais aucune ne marche ( ou c’est moi qui fait n’importe quoi , voire un peu des 2 )

Si quelqu’un a la solution, ca m interesse