enregisrement d'un Flex vers BDD

bonjour
je voudrais enregistrer les informations qui sont dans mon FlexGrid vers ma base de données
au début j'ai fait un petit code qui me permet d'écrire dans le FlexGrid mais maintenant j'essaye d'importer ces données vers ma base de données acces et ça ne marche pas !
SVP vérifier et dite moi ou est l'erreur

(rec est un recordset)

'renvois des informations du Flexgrid à la base de données
r = 1
c = 0
For r = 0 To Flex1.Rows - 1

    For c = 0 To Flex1.Cols - 1
    Rec.AddNew
     Rec("TéléphoneBureau") = Flex1.Text
     Rec ("Nom") = Flex1.Text
     
    Next c
Next r
merci d'avance

j'ai mis r = 0 au début le premier code r = 1 (erreur)

    For c = 0 To Flex1.Cols - 1
     Rec.AddNew
     Rec!TelephoneBureau = Flex1.Text --> Sans accent c'est préférable
     Rec!Nom = Flex1.Text
     --> Tu enregistre la même information dans tonrecordset. C'est à dire rec!TelephoneBureau et Rec!Nom on la même valeur c'est à dire Flex1.text
     Rec.update
    Next c
Next r

Bon courage

S.L.B.