MSFlexGrid

Encontré un código, pero nunca lo he probado, esa será tu tarea, ¿ok?
Lo primero es agregar a nuestro proyecto la referencia a la librería de Word.
Ve este ejemplo, contamos con un MSFlexGrid, un Form, y un Menu con el nombre MNUImprimir. En el evento MNUImprimir, escribimos el siguiente código (en este ejemplo, la aplicación genera un reporte de historial de usuarios).
Private Sub MNUImprimir_Click()
Dim MSWord As Word.Application
Dim Documento As Word.Document
Dim Parrafo As Table
Dim F, C As Double
Set MSWord = New Word.Application 'nuevo objeto para llamar a la aplicación
Set Documento = MSWord.Documents.Add 'nuevo documento
'a continuación, creamos una tabla dentro del nuevo documento
Set Parrafo = Documento.Tables.Add(Documento.Range(0, 0), GRDHist.Rows, GRDHist.Cols - 1)
'recorremos el grid para agregar las columnas y filas a nuestra tabla
For C = 1 To GRDHist.Cols - 1
Parrafo.Cell(1, C).Range.InsertAfter GRDHist.TextMatrix(0, C) 'agregar columnas
For F = 2 To GRDHist.Rows - 1
Parrafo.Cell(F, C).Range.InsertAfter GRDHist.TextMatrix(F, C) 'agregar filas
Next F
Next C
MSWord.Visible = True 'hacemos visible el documento, para desplegarlo en pantalla
End Sub
Pruébalo y me avisas, ¿ok?