Bonjour,

Dans un formulaire, j’ai 2 zones de liste et un sous formulaire en mode continu.

Sur l’évènement AprèsMiseàJour de la zone de liste 2, j’aimerai que le contenu de la zone de liste 2 s’insère dans le sous formulaire via une requête ajout.

J’ai suivi les 2 solutions de MS (ici), rien n’y fait.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Private Sub MaZonedeListe2_AfterUpdate()
Dim sql1 As String
Dim sql2 As String
sql1 = TEST("Formulaire2", " MaZonedeListe1", 0)
sql2 = TEST("Formulaire2", " MaZonedeListe2", 0)
DoCmd.RunSQL "INSERT INTO Table1 (Champ1, Champ2) SELECT Champ1, Champ2 FROM Table1 WHERE Champ1 = sql1 AND Champ2 = sql2;"
Me.SFormulaire2.Requery
End Sub
Mais j’ai toujours un message demandant d’entrer la valeur pour les paramètres sql1 et sql2 alors qu’en mode debug, ils sont bien renseignés. L'insertion de la valeur sélectionnée ne se fait pas non plus dans le sous formulaire.
Où sont les erreurs ?

Merci par avance de votre aide