Hola william,
para cargar los datos del Grid en una segunda tabla:
Creas un recordset a esa tabla (debe tener los mismos campos que la tabla anterior).
Código:
For j = 1 To MSFlexGrid1.Rows - 1
rs.AddNew
For i = 1 To MSFlexGrid1.Cols - 1
If Not IsNull(MSFlexGrid1.TextMatrix(j, i)) Then
rs(i - 1) = MSFlexGrid1.TextMatrix(j, i)
End If
Next i
rs.Update
Next j
Las variables i - j son de tipo numérico (Integer o Long) según tus necesidades.