Modifier un enregistrement avec VBA

Bonjour,
J'ai créé un formulaire me permettant de modifier certains enregistrement de ma table. Cela fonctionnait si ce n'est que quel que soit l'enregistrement choisi grâce à une liste déroulante c'est toujours le premier enregistrement qui subissait la modification.
J'ai donc créé une boucle "Do Until" ... "Loop" pour repérer l'enregistrement de ma table qui correspondait au choix réalisé avec la liste déroulante .... et alors plus rien ne se passe !!!!
Quelle est mon erreur ?
Merci

Set MaTable = CurrentDb.OpenRecordset("T_Budget")
    Do Until MaTable.EOF = True
        If MaTable("Intitule_Charge") = Form![Choix_Charge] Then
            MaTable.Edit
                MaTable("Intitule_Charge") = "machin" 
            MaTable.Update
        End If
    MaTable.MoveNext
    Loop
    MaTable.Close

P.S. : Intitule_Charge est le nom du champ de la table que je veux modifier en le remplaçant par exemple par "machin" et Choix_Charge est l'Intitule_Charge de l'enregistrement choisi.