Primero deberías usar un Connection para conectarte a la base de datos y un objeto Recordset para obtener los registros del campo memo. Después pasar a una variable String el campo memo en cuestión y crear un objeto "Word.Document" para trabajar sobre el. Una vez que tenés el objeto "Document" usar los métodos Range y SaveAs para establecer el texto y guardar el documento en un archivo, por ejemplo:
Sub GuardarCualquierMemo()
Dim CConn As New ADODB.Connection
Dim CRecord As New ADODB.Recordset
Dim CDocument As Object
Dim sConn$, sData$
sConn = "Provider=MSDASQL.1;" & _
"Persist Security Info=False;" & _
"Data Source=MS Access Database;" & _
"Initial Catalog=C:\MiBaseDeDatos.mdb"
CConn.Open sConn 'Abre la conección a la base de datos.
'Abre el Recordset
CRecord.Open "Tabla1", CConn, adOpenKeyset, adLockOptimistic, adCmdTable
sData = CRecord.Fields("MiCampoMemo") 'Obtiene un campo memo.
'Crea un documento de word.
Set CDocument = CreateObject("Word.Document")
CDocument.Range.Text = sData 'Escribe el campo en el documento.
CDocument.SaveAs "C:\MiDocumento.DOC" 'Guarda el archivo.
CDocument.Close 'Cierra el objeto
CConn.Close
End Sub
Para obtener los datos guardados se usa la función GetObject de Visual Basic para crear el objeto Document desde el archivo guardado:
Sub LeerCualquierMemo()
Dim CConn As New ADODB.Connection%0