Discussion :

[uloaccess]

Bonjour,
J'aimerais savoir comment retrouver une donnée dans une zone de liste au fur et à mesure que je saisie ma demande dans un champ.
Je m'explique:
Sur mon formulaire, il y a une zone de liste et un champ de saisie.
Pendant que je saisisse ma demande, il s'effectue automatiquemant un tri dans ma zone de liste afin de mettre en evidence l'element recherché ou avoir l'element le plus proche de ma BD lors de ma recherche.

[samlepiratepaddy]

Slt,
Pour ce type de recherche j'utilise plutôt une liste déroulante, et tu l'a parametre sur "Auto Etendre"-->Oui
Au fur et a mesure que tu écris la liste "affine" automatiquement !
Voilà@+

[Faw]

Salut, tu peux t'inspirer de ceci (Param = ton champ de saisie)

Code :

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

1
2
3
4
5
Private Sub Param_Change()
Me.Requery
Me.Liste0.RowSource = "SELECT Champ1, Champ2  FROM Table WHERE [Clé]Like'" &_
Me![Param] & "*'"
Me.Param.SelStart = 9999 'Curseur à droite pour continuer la saisie

Note: j'avais déjà essayé d'éviter l'inélégant Requery du début en
passant par Param.Text mais ça n'avait pas marché...

PS: J'ai mis [Clé] dans l'exemple mais ça peut être un autre champ bien sûr.

[Arkham46]

Faw, c'est pas sur le formulaire que tu dois faire le requery mais sur la zone de liste :

Code :

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

1
2
3
 
Me.Liste0.RowSource = "SELECT Champ1, Champ2  FROM Table WHERE [Clé] Like'" & Me.Param.text & "*'"
Me.liste0.requery

ça doit suffire non?

[Faw]

OUI, t'as raison. pourquoi Me
ça marche et c'est plus clean...

[uloaccess]

Bonjour,
Ca marche

[uloaccess]

Salut,
Ca marche mais il se trouve que j'ai une liste déroulante qui permet de faire un 1er tri dans ma zone de liste. Ensuite une zone de saisie qui termine le tri.
Mais , il se trouve qu'en saisie la donnée à retrouver, la zone de liste affiche tous en fonction de ce qui est saisi en faisant fi du 1er tri.
Je suppose que c'est dû à ce code:

Code :

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

Me.Listrech.Requery

, ce qui est normal.
Question:
Comment restreindre ma zone de liste afin qu'elle affiche uniquement les données en prenant en compte les deux critères de recherches: liste déroulante d'abord puis zone de saisie ensuite?
Merci

[Faw]

Tu peux essayer

Code :

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

Me.liste.RowSource = me.liste.RowSource & "And  [Clé] Like'" & Me.Param.text & "*'""

Edit:
En fait non. Cette solution marche en apparence mais le rowsource va
s'allonger à chaque passage de "And [Clé] Like'" & Me.Param.text & "*'"".
Un moment la chaine sera trop longue et ...Bam!

Une solution consisterait à stocker le rowsource de Liste dans une variable
Une fois qu'elle est filtrée par la Zone de liste

Code :

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

MaVar = Me.Liste.rowsource

Et dans l'événement Change() tu auras

Code :

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

Me.liste.RowSource = MaVar & "And  [Clé] Like'" & Me.Param.text & "*'""

Bon W.E

[Tofalu]

Ca marche mais il se trouve que j'ai une liste déroulante qui permet de faire un 1er tri dans ma zone de liste.

T'es sûr que c'est bien ergonomique et pratique ?

Que se passera t'il si rien n'est saisi dans la première liste ?

[uloaccess]

Bonjour,
Ca marche

Que se passera t'il si rien n'est saisi dans la première liste ?

A l'ouverture du formulaire, rien n'est saisi dans la 1re liste donc Zone de liste affiche tout.
Pour une nvlle recherche, on rafraichi à nouveau zone de liste.
Merci