Bonjour,
J'ai créé un formulaire avec un menu déroulant qui me permet de rechercher des donnéees dans une table et les affiche dans des zone de texte. J'ai créé le codes suivant :
Mod_Recherche et ma liste déroulante
Ca fonctionne très bien.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Private Sub Mod_Recherche_AfterUpdate() Forms!Formulaire4.RecordSource = "SELECT * FROM PRINCIPAL WHERE id_principal=" & Me.Mod_Recherche & "" End Sub
J'ai mis le code suivant :
Quand je modifie une zone de texte et que je confirme ma validation avec la boite de dialogue du code ci-dessus : pas de problème
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Private Sub Form_BeforeUpdate(Cancel As Integer) If MsgBox("Voulez-vous confirmer la modification", vbQuestion + vbYesNo, "CONFIRMATION") = vbNo Then Me.Undo Cancel = True End If End Sub
et si je ne veux pas valider, j'ai une erreur :
La valeur n'est pas conforme aux règles de validation définies pour le champ ou contrôle
Le debuggage me renvoie à la ligne :
Me.Mod_Recherche a pourtant une valeur.
Code : Sélectionner tout - Visualiser dans une fenêtre à part Forms!Formulaire4.RecordSource = "SELECT * FROM PRINCIPAL WHERE id_principal=" & Me.Mod_Recherche & ""
Quelqu'un pouraait-il à résoudre cette erreur svp.
Merci
Partager