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.
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.
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
Où sont les erreurs ?
Merci par avance de votre aide
Partager