Discussion :

[morobaboumar]

Bonsoir membres du forum,
J'ai trouvé cette formation ici https://www.bonbache.fr/saisie-semi-...ccess-210.html concernant la recherche automatique à partir d'une zone texte dans Access.
Mes difficultés sont au fait que la zone de liste liste_communes n'affiche pas les noms des villes
recherchées à partir du moteur de recherche comme il est expliqué.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Option Compare Database
Option Explicit
 
Private Sub liste_communes_Click()
 
moteur.Value = liste_communes.Value
moteur.SetFocus
If liste_communes.Visible = True Then liste_communes.Visible = False
DoCmd.Requery
 
End Sub
 
Private Sub moteur_Change()
If liste_communes.Visible = False Then liste_communes.Visible = True
liste_communes.RowSource = "SELECT DISTINCT nom_commune FROM Liste_communes WHERE nom_commune LIKE " & moteur.Text & "*"
End Sub
 
Function masquer_liste()
If liste_communes.Visible = True Then liste_communes.Visible = False
 
End Function

Pièce jointe

Cordialement