Discussion :

[Apoulit]

Bonjour,
j'ai fait une liste "Liste_check" et elle se met à jour en fonction de deux champs , Nom et Prenom

Pour le Nom aucun problème, mais une fois le Nom saisie je passe sur le champ Prenom et je voudrais que ma liste s'affine ...

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
Private Sub Nom_KeyDown(KeyCode As Integer, Shift As Integer)
strRowSource = "SELECT [Nom],[Prenom],[Code_Postal],[Commune],[Sport],[Statut], [Categorie]" & "FROM T_Abonnes " & _
"WHERE [Nom] like '*" & Me.Nom.Text & "*' AND [Categorie] = 'BADMINTON'"
Liste_check.RowSource = strRowSource
End Sub
 
 
 
Private Sub Prenom_KeyDown(KeyCode As Integer, Shift As Integer)
strRowSource = "SELECT [Nom],[Prenom],[Code_Postal],[Commune],[Sport],[Statut], [Categorie]" & "FROM T_Abonnes " & _
"WHERE [Prenom] like '*" & Me.Prenom.Text & "*' AND [Categorie] = 'BADMINTON' AND [Nom]= 'dupond'"
 
 
'strRowSource = "SELECT [Nom],[Prenom],[Code_Postal],[Commune],[Sport],[Statut], [Categorie]" & "FROM T_Abonnes " & _
'"WHERE [Prenom] like '*" & Me.Prenom.Text & "*' AND [Categorie] = 'BADMINTON' AND [Nom]= 'Me.Nom'"
 
Liste_check.RowSource = strRowSource
End Sub

Si dans mon champ nom j'ai saisie "dupond" la saisie selon le prénom s'affine bien avec le code actuel ci dessus.
Mais je voudrais remplacer le mot dupond par la valeur du champ Nom, et là ça fonctionne pas, code mis en commentaire.
Où est mon erreur ?

Merci d'avance.

[micniv]

pour Nom, reprend la syntaxe comme tu as fait pour Prenom !!!

Code :

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

 ... AND [nom] = '" & Me.nom & "'"

[Apoulit]

Merci beaucoup !

[tee_grandbois]

bonjour,
l'apostrophe étant un caractère autorisé dans un nom (L'héritier, D'Hauterive ...) je conseillerai l'utilisation des doubles guillemets comme délimiteur de texte plutôt que l'apostrophe:

Code :

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

" ... AND [nom] = """ & Me.nom & """"

cela permet d'éviter une éventuelle erreur de syntaxe

[Apoulit]

Bonsoir tee_grandbois,
merci pour avoir pris le temps de répondre à mon commentaire du coup j'ai modifié toutes mes syntaxes et j'ai remplacé les ' par des "".