Discussion :

[Beber39]

Bonjour,

est-il possible d'afficher dans une liste déroulante, non pas les éléments qui commencent par les caractères saisis, mais les éléments qui contiennent les caractères saisis ?
Si ce n'est pas possible, existe-t-il une astuce pour contourner ?

Merci.

[marot_r]

Bonjour.

Ce n'est pas le fonctionnement standard donc il faut bricoler un peu.

1. Il faut mettre à faux la propriété auto complete de la liste déroulante.
2. If faut définir comme source une requête paramétrée. Quelque chose comme :
   

   Code sql :

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

   select [TaTable].[TonChamp] from [TaTable] where [TaTable].[TonChamp] like "*" & [Forms]![TonForm]![TonChamp] & "*"

3. Il faut mettre dans l'événement Sur Changement (onChange):
   

   Code :

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

   me.TonChamp.requery 'force la relecture des données à chaque frappe

4. Et sur l'événement Sur Réception du focus
   

   Code :

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

   me.TonChamp.requery 'force la relecture des donnéesinitiale

A+

[Beber39]

Merci pour cette réponse très rapide.

J'ai mis en œuvre mais un soucis lors de la frappe :
Erreur d'exécution 2118 : enregistrez le champ en actif avant d’exécuter l'action Actualiser

C'est l’événement Sur Changement qui provoque l'erreur.

Merci

[marot_r]

Miel.

Essaye cela à la place du code de OnChange :

me.TonChamp.recordsource-= me.TonChamp.recordsource

A+

[Beber39]

La syntaxe serait plutôt :

Code :

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

me.TonChamp.RowSource-= me.TonChamp.RowSource

au lieu de

Code :

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

me.TonChamp.recordsource-= me.TonChamp.recordsource

Mais,je ne comprends pas le signe - avant le =

Sinon, aucun effet de ce code : la liste ne se met pas à jour sur frappe

Merci

[marot_r]

Exact.

Et désolé mon PC a planté avant que j'ai pu relire mon post et faire les corrections moi-même.

A+

[marot_r]

Essaye :

Code :

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

me.TonChamp.RowSource = me.TonChamp.RowSource

Code sql :

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

select [TaTable].[TonChamp] from [TaTable] where [TaTable].[TonChamp] like "*" & [Forms]![TonForm]![TonChamp].Text & "*"

J'ai fait un test chez moi et cela marche.
Si on ne précise pas Access prend la propriété .Value et celle-ci n'est modifiée QUE quand tu as validé la saisie pas à chaque frappe.
La propriété .Text représente ce que tu vois à l'écran en ce moment donc tient compte de ce que tu as entré.

A+

[Beber39]

Super, ça marche !

J'ai ajouté

Code :

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

me.TonChamp.dropdown

sur l'évènement Sur Changement pour avoir la visualisation de la liste en cours de frappe.

Merci beaucoup Marot_R pour ton aide.