Bonjour à tous,
J'ai créé cette fonction dans une base Access 2007 pour un projet de 3ème année de fac :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Private Sub Ville_AfterUpdate() Dim Resultat Resultat = DLookup("Ville", "Cl", "CodePostal='" & CodePostal & "' AND Ville & '',<> '' AND [Cl]<>'" & [Cl] & "'") If (Resultat <> "" And Ville & "" = "") Then Ville = Resultat End If End Sub
Je voulais savoir pourquoi elle ne fonctionne pas. En fait rien ne se passe quand je mets un code postal puis que je valide dans mon formulaire.
Je ne connais presque rien en visual basic, l'essentiel de mon projet étant censé être fait uniquement par des requêtes, mais là je crois qu'il n'y avait pas le choix.
Je vous remercie pour votre aide !
Partager