Es sencillo, simplemente abre un recordset, del modo habitual que utilices.
Luego haces un bucle que recorra todas las lineas del msflexgrid, teniendo en cuenta si la primera linea contiene cabeceras o no, y que empieza de 0.
suponiendo que el recordset se llame RSTABLA
dim n as long
for n= 2 to msflexgrid1.rows
RSTABLA.ADDNEW
RSTABLA!CAMPO1 = MSFLEXGRID1.TEXTMATRIX ( n-1, 0)
RSTABLA!CAMPO2 = MSFLEXGRID1.TEXTMATRIX ( n-1, 1)
RSTABLA!CAMPO3 = MSFLEXGRID1.TEXTMATRIX ( n-1, 2)
RSTABLE.UPDATE
next