Visual Basic - NECESITO AYUDA

Tengo un codigo para exportar los datos de una Datagrid en VB 6.0 a un documento de word. Pero cuando lo ejecuto me da este error:
NUMERO DE FILA INCORRECTO

Por favor mirenlo y me dicen que esoy haciendo mal

Private Sub Command1_Click()
On Error GoTo ErrSub

'Variable de tipo Word Aplication
Dim o_Word As Word.Application
'Variable para manipular el documento
Dim Documento As Word.Document
'Variable de tipo tabla para poder hacer _
referencia a la tabla dentro del Word
Dim Parrafo As Table

'La f es para referenciar a las filas y la _
C para las columnas de la tabla de Word
Dim F, C As Double

'nuevo objeto de tipo Word Application
Set o_Word = New Word.Application

'hacemos visible el documento
o_Word.Visible = True

'Añadimos un Nuevo documento de word
Set Documento = o_Word.Documents.Add

'creamos una tabla dentro del documento
Set Parrafo = Documento.Tables.Add(Documento.Range(0, 0), _
DataGrid1.ApproxCount + 1, DataGrid1.Columns.Count)

'recorremos el DataGrid para agregar las columnas y filas a nuestra tabla
For C = 0 To DataGrid1.Columns.Count
DataGrid1.Row = 0
' Agregar las columnas
Parrafo.Cell(1, C + 1).Range.InsertAfter DataGrid1.Columns(C).Caption
For F = 1 To DataGrid1.ApproxCount
Parrafo.Cell(F + 1, C + 1).Range.InsertAfter _
DataGrid1.Columns(C).Value
DataGrid1.Row = DataGrid1.Row + 1
Next
Next C

'descargamos los objetos
Set o_Word = Nothing
Set Documento = Nothing
Set Parrafo = Nothing

Exit Sub

ErrSub:

MsgBox Err.Description, vbCritical
On Error Resume Next
Set o_Word = Nothing
Set Documento = Nothing
Set Parrafo = Nothing

End Sub