Bonjour à tous

Je souhaite que le champ IDVirmt soit mise à jour après la mise à jour de la liste déroulante "Société"et c'est pour cela que je met un Requery dans le champ "Société" et en AfterUpDate, mais ce Requery ne fonctionne pas et il faut fermer le formulaire et de nouveau l'ouvrir faire de nouveau une saisie pour que la mise à jour du champ IDVirmt fonctionne.
Je pense que je commet une erreur.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
 
Private Sub Société_AfterUpdate()
Dim MAJ As String
 
    MAJ = "UPDATE Feuil2 SET Feuil2.IDVirmt = [Feuil2].[Numéro];"    
    CurrentDb.Execute MAJ, dbFailOnError
Forms![Frm_Saisie]![Société].Requery
A+
Franck