OVH Cloud OVH Cloud

liste

8 réponses
Avatar
Jean-Marcel
Dans mon formulaire "Articles", j'ai une liste (zone de liste - indépendant)
qui me facilite la recherche de mes articles. Si je tape par exemple la
lettre "p" dans cette liste, le curseur va chercher le premier article
commençant par "p". J'aimerai pouvoir affiner ma recherche en tapant 2 voire
3 lettres , par exemple "pre" et que le curseur se mette sur le premier
article commençant par "pre". Cela est-il possible ?

Merci d'avance aux personnes qui sauraient m'indiquer la procédure et
meilleures salutations à toutes et à tous.

Jean-Marcel

8 réponses

Avatar
ze Titi
Hello Jean-Marcel !

Je n'utilise pratiquement jamais les listes... Je sais que pour une
liste déroulante, il suffit de placer la propriété Auto Etendre à vrai
(valeur par défaut me semble-t-il). Mais pour une liste, je ne pense
pas qu'il existe de propriété allant dans ce sens.
Je contournerais bien le problème en passant par un champ extérieur
mais en y réfléchissant, c'est du code à écrire pour une solution qui
existe déjà peut-être en standard... Attendons la réponse des MVP et
autres balaises du même accabit. ;-)

en ce jour mémorable du vendredi 02/02/2007, tu as entrepris la lourde
tâche de taper sur ton clavier :
Dans mon formulaire "Articles", j'ai une liste (zone de liste - indépendant)
qui me facilite la recherche de mes articles. Si je tape par exemple la
lettre "p" dans cette liste, le curseur va chercher le premier article
commençant par "p". J'aimerai pouvoir affiner ma recherche en tapant 2 voire
3 lettres , par exemple "pre" et que le curseur se mette sur le premier
article commençant par "pre". Cela est-il possible ?

Merci d'avance aux personnes qui sauraient m'indiquer la procédure et
meilleures salutations à toutes et à tous.

Jean-Marcel


--
Voilou !
Cordialement,

Ze Titi

Avatar
Gilbert
Bonjour,

Voici ce que j'utilise qui permet de réduire le contenu de la liste aux
valeurs commençant par les lettres tapées.

Un champ texte indépendant et dans l'évènement Sur touche relachée de ce
champ

Private Sub ChoixNoms_KeyUp(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyUp, vbKeyDown, vbKeyLeft, vbKeyRight
Exit Sub
Case Else
Me.Listedenoms.RowSource = "SELECT .............. WHERE &
"([LeChampQuiVaBien]) like '" & Me.ChoixNoms.Text & "*'"
Me.Listedenoms.Requery
End Select
End Sub


--
Gilbert


"Jean-Marcel" a écrit dans le message
de news:
Dans mon formulaire "Articles", j'ai une liste (zone de liste -
indépendant)
qui me facilite la recherche de mes articles. Si je tape par exemple la
lettre "p" dans cette liste, le curseur va chercher le premier article
commençant par "p". J'aimerai pouvoir affiner ma recherche en tapant 2
voire
3 lettres , par exemple "pre" et que le curseur se mette sur le premier
article commençant par "pre". Cela est-il possible ?

Merci d'avance aux personnes qui sauraient m'indiquer la procédure et
meilleures salutations à toutes et à tous.

Jean-Marcel



Avatar
Jean-Marcel
Bonjour Gilbert,
Tout d'abord merci de votre renseignement et excusez-moi de ne pas avoir
répondu plus tôt. (On ne fait pas toujours ce qu'on veut !)
Si je peux me permettre de donner ci-dessous le code que j'ai actuellement
pour qu'en sélectionnant un article dans la liste celui-ci apparaisse, en
regard, dans mon formulaire

Private Sub Liste25_AfterUpdate()
'Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[N° A] = " & Str(Me![Liste25])
Me.Bookmark = rs.Bookmark
End Sub

et vous demander comment je devrais insérer ce que vous proposez pour
qu'au-lieu du premier caractère seulement, la sélection se fasse sur 3
caractères par exemple.

J'espère ne pas abuser de votre amabilité et vous en remercie d'avance.

Jean-Marcel



Bonjour,

Voici ce que j'utilise qui permet de réduire le contenu de la liste aux
valeurs commençant par les lettres tapées.

Un champ texte indépendant et dans l'évènement Sur touche relachée de ce
champ

Private Sub ChoixNoms_KeyUp(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyUp, vbKeyDown, vbKeyLeft, vbKeyRight
Exit Sub
Case Else
Me.Listedenoms.RowSource = "SELECT .............. WHERE &
"([LeChampQuiVaBien]) like '" & Me.ChoixNoms.Text & "*'"
Me.Listedenoms.Requery
End Select
End Sub


--
Gilbert


"Jean-Marcel" a écrit dans le message
de news:
Dans mon formulaire "Articles", j'ai une liste (zone de liste -
indépendant)
qui me facilite la recherche de mes articles. Si je tape par exemple la
lettre "p" dans cette liste, le curseur va chercher le premier article
commençant par "p". J'aimerai pouvoir affiner ma recherche en tapant 2
voire
3 lettres , par exemple "pre" et que le curseur se mette sur le premier
article commençant par "pre". Cela est-il possible ?

Merci d'avance aux personnes qui sauraient m'indiquer la procédure et
meilleures salutations à toutes et à tous.

Jean-Marcel








Avatar
Gilbert
Bonjour,
L'exemple que je t'ai donné te permet de réduire l'affichage de la liste aux
enregistrements dont le champ recherché commence par les caractères saisis.
Si tu tapes A, ta liste n'affichera que les enregistrement dont le champ
recherché commence par A
Si tu ajoutes B, ta liste n'affichera plus que les enregistrement dont le
champ recherché commence par AB
etc...
Il te suffit d'ajouter un controle Zone de texte à ton formulaire et
d'ajouter le code que je t'ai donné dans l'évènement Sur touche relachée (en
adaptant bien sur les noms de champ, de controle et le texte de la requete.

--
Gilbert


"Jean-Marcel" a écrit dans le message
de news:
Bonjour Gilbert,
Tout d'abord merci de votre renseignement et excusez-moi de ne pas avoir
répondu plus tôt. (On ne fait pas toujours ce qu'on veut !)
Si je peux me permettre de donner ci-dessous le code que j'ai actuellement
pour qu'en sélectionnant un article dans la liste celui-ci apparaisse, en
regard, dans mon formulaire

Private Sub Liste25_AfterUpdate()
'Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[N° A] = " & Str(Me![Liste25])
Me.Bookmark = rs.Bookmark
End Sub

et vous demander comment je devrais insérer ce que vous proposez pour
qu'au-lieu du premier caractère seulement, la sélection se fasse sur 3
caractères par exemple.

J'espère ne pas abuser de votre amabilité et vous en remercie d'avance.

Jean-Marcel



Bonjour,

Voici ce que j'utilise qui permet de réduire le contenu de la liste aux
valeurs commençant par les lettres tapées.

Un champ texte indépendant et dans l'évènement Sur touche relachée de ce
champ

Private Sub ChoixNoms_KeyUp(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyUp, vbKeyDown, vbKeyLeft, vbKeyRight
Exit Sub
Case Else
Me.Listedenoms.RowSource = "SELECT .............. WHERE &
"([LeChampQuiVaBien]) like '" & Me.ChoixNoms.Text & "*'"
Me.Listedenoms.Requery
End Select
End Sub


--
Gilbert


"Jean-Marcel" a écrit dans le
message
de news:
Dans mon formulaire "Articles", j'ai une liste (zone de liste -
indépendant)
qui me facilite la recherche de mes articles. Si je tape par exemple la
lettre "p" dans cette liste, le curseur va chercher le premier article
commençant par "p". J'aimerai pouvoir affiner ma recherche en tapant 2
voire
3 lettres , par exemple "pre" et que le curseur se mette sur le premier
article commençant par "pre". Cela est-il possible ?

Merci d'avance aux personnes qui sauraient m'indiquer la procédure et
meilleures salutations à toutes et à tous.

Jean-Marcel











Avatar
Jean-Marcel
Bonjour Gilbert,
Merci pour ta bonne volonté. Malheureusement, je n'y arrive pas car je ne
sais pas comment insérer mes données dans le code que tu me donnes.
Mon formulaire "Articles Form" comporte le champ texte "Article" avec son N°
ID "N° A".
Il y a aussi sur mon formulaire le champ indépendant zone de liste "Liste25"
qui affiche la totalité de mes articles et qui me permet, avec le code que
j'ai indiqué ci-dessous, de rechercher et de sélectionner celui que je veux
afficher.
D'après ce que je comprends, je devrai créer un contrôle indépendant zone de
texte
(qui s'appellerai Texte33) pour y greffer, sur touche relâchée, le code que
tu m'as écrit.
Si je n'abuse pas trop, pourrais-tu compléter ton code avec le nom de mes
champs/contrôles ?
D'avance merci.

Jean-Marcel

Bonjour,
L'exemple que je t'ai donné te permet de réduire l'affichage de la liste aux
enregistrements dont le champ recherché commence par les caractères saisis.
Si tu tapes A, ta liste n'affichera que les enregistrement dont le champ
recherché commence par A
Si tu ajoutes B, ta liste n'affichera plus que les enregistrement dont le
champ recherché commence par AB
etc...
Il te suffit d'ajouter un controle Zone de texte à ton formulaire et
d'ajouter le code que je t'ai donné dans l'évènement Sur touche relachée (en
adaptant bien sur les noms de champ, de controle et le texte de la requete.

--
Gilbert


"Jean-Marcel" a écrit dans le message
de news:
Bonjour Gilbert,
Tout d'abord merci de votre renseignement et excusez-moi de ne pas avoir
répondu plus tôt. (On ne fait pas toujours ce qu'on veut !)
Si je peux me permettre de donner ci-dessous le code que j'ai actuellement
pour qu'en sélectionnant un article dans la liste celui-ci apparaisse, en
regard, dans mon formulaire

Private Sub Liste25_AfterUpdate()
'Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[N° A] = " & Str(Me![Liste25])
Me.Bookmark = rs.Bookmark
End Sub

et vous demander comment je devrais insérer ce que vous proposez pour
qu'au-lieu du premier caractère seulement, la sélection se fasse sur 3
caractères par exemple.

J'espère ne pas abuser de votre amabilité et vous en remercie d'avance.

Jean-Marcel



Bonjour,

Voici ce que j'utilise qui permet de réduire le contenu de la liste aux
valeurs commençant par les lettres tapées.

Un champ texte indépendant et dans l'évènement Sur touche relachée de ce
champ

Private Sub ChoixNoms_KeyUp(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyUp, vbKeyDown, vbKeyLeft, vbKeyRight
Exit Sub
Case Else
Me.Listedenoms.RowSource = "SELECT .............. WHERE &
"([LeChampQuiVaBien]) like '" & Me.ChoixNoms.Text & "*'"
Me.Listedenoms.Requery
End Select
End Sub


--
Gilbert


"Jean-Marcel" a écrit dans le
message
de news:
Dans mon formulaire "Articles", j'ai une liste (zone de liste -
indépendant)
qui me facilite la recherche de mes articles. Si je tape par exemple la
lettre "p" dans cette liste, le curseur va chercher le premier article
commençant par "p". J'aimerai pouvoir affiner ma recherche en tapant 2
voire
3 lettres , par exemple "pre" et que le curseur se mette sur le premier
article commençant par "pre". Cela est-il possible ?

Merci d'avance aux personnes qui sauraient m'indiquer la procédure et
meilleures salutations à toutes et à tous.

Jean-Marcel
















Avatar
Gilbert
Bonjour,

Quelle est le ControlSource (Source controle) de ta liste (Liste25)?

--
Gilbert


"Jean-Marcel" a écrit dans le message
de news:
Bonjour Gilbert,
Merci pour ta bonne volonté. Malheureusement, je n'y arrive pas car je ne
sais pas comment insérer mes données dans le code que tu me donnes.
Mon formulaire "Articles Form" comporte le champ texte "Article" avec son

ID "N° A".
Il y a aussi sur mon formulaire le champ indépendant zone de liste
"Liste25"
qui affiche la totalité de mes articles et qui me permet, avec le code que
j'ai indiqué ci-dessous, de rechercher et de sélectionner celui que je
veux
afficher.
D'après ce que je comprends, je devrai créer un contrôle indépendant zone
de
texte
(qui s'appellerai Texte33) pour y greffer, sur touche relâchée, le code
que
tu m'as écrit.
Si je n'abuse pas trop, pourrais-tu compléter ton code avec le nom de mes
champs/contrôles ?
D'avance merci.

Jean-Marcel

Bonjour,
L'exemple que je t'ai donné te permet de réduire l'affichage de la liste
aux
enregistrements dont le champ recherché commence par les caractères
saisis.
Si tu tapes A, ta liste n'affichera que les enregistrement dont le champ
recherché commence par A
Si tu ajoutes B, ta liste n'affichera plus que les enregistrement dont le
champ recherché commence par AB
etc...
Il te suffit d'ajouter un controle Zone de texte à ton formulaire et
d'ajouter le code que je t'ai donné dans l'évènement Sur touche relachée
(en
adaptant bien sur les noms de champ, de controle et le texte de la
requete.

--
Gilbert


"Jean-Marcel" a écrit dans le
message
de news:
Bonjour Gilbert,
Tout d'abord merci de votre renseignement et excusez-moi de ne pas
avoir
répondu plus tôt. (On ne fait pas toujours ce qu'on veut !)
Si je peux me permettre de donner ci-dessous le code que j'ai
actuellement
pour qu'en sélectionnant un article dans la liste celui-ci apparaisse,
en
regard, dans mon formulaire

Private Sub Liste25_AfterUpdate()
'Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[N° A] = " & Str(Me![Liste25])
Me.Bookmark = rs.Bookmark
End Sub

et vous demander comment je devrais insérer ce que vous proposez pour
qu'au-lieu du premier caractère seulement, la sélection se fasse sur 3
caractères par exemple.

J'espère ne pas abuser de votre amabilité et vous en remercie d'avance.

Jean-Marcel



Bonjour,

Voici ce que j'utilise qui permet de réduire le contenu de la liste
aux
valeurs commençant par les lettres tapées.

Un champ texte indépendant et dans l'évènement Sur touche relachée de
ce
champ

Private Sub ChoixNoms_KeyUp(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyUp, vbKeyDown, vbKeyLeft, vbKeyRight
Exit Sub
Case Else
Me.Listedenoms.RowSource = "SELECT .............. WHERE &
"([LeChampQuiVaBien]) like '" & Me.ChoixNoms.Text & "*'"
Me.Listedenoms.Requery
End Select
End Sub


--
Gilbert


"Jean-Marcel" a écrit dans le
message
de news:
Dans mon formulaire "Articles", j'ai une liste (zone de liste -
indépendant)
qui me facilite la recherche de mes articles. Si je tape par exemple
la
lettre "p" dans cette liste, le curseur va chercher le premier
article
commençant par "p". J'aimerai pouvoir affiner ma recherche en tapant
2
voire
3 lettres , par exemple "pre" et que le curseur se mette sur le
premier
article commençant par "pre". Cela est-il possible ?

Merci d'avance aux personnes qui sauraient m'indiquer la procédure
et
meilleures salutations à toutes et à tous.

Jean-Marcel


















Avatar
Jean-Marcel
Bonjour,
Il n'y en a pas car c'est un contrôle indépendant créé à partir de zone de
liste de la boîte à outils, zone de liste qui reprend les enregistrements de
la table "Articles"par une instruction SQL créée sous la ligne contenu de la
feuille de propriétés ce qui donne le code que j'avais écrit ci-dessous.
Je sens que ça se complique pour toi, si trop on laisse tomber, tant pis.

Merci encore.
Jean-Marcel


Bonjour,

Quelle est le ControlSource (Source controle) de ta liste (Liste25)?

--
Gilbert


"Jean-Marcel" a écrit dans le message
de news:
Bonjour Gilbert,
Merci pour ta bonne volonté. Malheureusement, je n'y arrive pas car je ne
sais pas comment insérer mes données dans le code que tu me donnes.
Mon formulaire "Articles Form" comporte le champ texte "Article" avec son

ID "N° A".
Il y a aussi sur mon formulaire le champ indépendant zone de liste
"Liste25"
qui affiche la totalité de mes articles et qui me permet, avec le code que
j'ai indiqué ci-dessous, de rechercher et de sélectionner celui que je
veux
afficher.
D'après ce que je comprends, je devrai créer un contrôle indépendant zone
de
texte
(qui s'appellerai Texte33) pour y greffer, sur touche relâchée, le code
que
tu m'as écrit.
Si je n'abuse pas trop, pourrais-tu compléter ton code avec le nom de mes
champs/contrôles ?
D'avance merci.

Jean-Marcel

Bonjour,
L'exemple que je t'ai donné te permet de réduire l'affichage de la liste
aux
enregistrements dont le champ recherché commence par les caractères
saisis.
Si tu tapes A, ta liste n'affichera que les enregistrement dont le champ
recherché commence par A
Si tu ajoutes B, ta liste n'affichera plus que les enregistrement dont le
champ recherché commence par AB
etc...
Il te suffit d'ajouter un controle Zone de texte à ton formulaire et
d'ajouter le code que je t'ai donné dans l'évènement Sur touche relachée
(en
adaptant bien sur les noms de champ, de controle et le texte de la
requete.

--
Gilbert


"Jean-Marcel" a écrit dans le
message
de news:
Bonjour Gilbert,
Tout d'abord merci de votre renseignement et excusez-moi de ne pas
avoir
répondu plus tôt. (On ne fait pas toujours ce qu'on veut !)
Si je peux me permettre de donner ci-dessous le code que j'ai
actuellement
pour qu'en sélectionnant un article dans la liste celui-ci apparaisse,
en
regard, dans mon formulaire

Private Sub Liste25_AfterUpdate()
'Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[N° A] = " & Str(Me![Liste25])
Me.Bookmark = rs.Bookmark
End Sub

et vous demander comment je devrais insérer ce que vous proposez pour
qu'au-lieu du premier caractère seulement, la sélection se fasse sur 3
caractères par exemple.

J'espère ne pas abuser de votre amabilité et vous en remercie d'avance.

Jean-Marcel



Bonjour,

Voici ce que j'utilise qui permet de réduire le contenu de la liste
aux
valeurs commençant par les lettres tapées.

Un champ texte indépendant et dans l'évènement Sur touche relachée de
ce
champ

Private Sub ChoixNoms_KeyUp(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyUp, vbKeyDown, vbKeyLeft, vbKeyRight
Exit Sub
Case Else
Me.Listedenoms.RowSource = "SELECT .............. WHERE &
"([LeChampQuiVaBien]) like '" & Me.ChoixNoms.Text & "*'"
Me.Listedenoms.Requery
End Select
End Sub


--
Gilbert


"Jean-Marcel" a écrit dans le
message
de news:
Dans mon formulaire "Articles", j'ai une liste (zone de liste -
indépendant)
qui me facilite la recherche de mes articles. Si je tape par exemple
la
lettre "p" dans cette liste, le curseur va chercher le premier
article
commençant par "p". J'aimerai pouvoir affiner ma recherche en tapant
2
voire
3 lettres , par exemple "pre" et que le curseur se mette sur le
premier
article commençant par "pre". Cela est-il possible ?

Merci d'avance aux personnes qui sauraient m'indiquer la procédure
et
meilleures salutations à toutes et à tous.

Jean-Marcel























Avatar
Gilbert
Tu ajoutes un contôle Zone de texte indépendant.
Tu ajoutes à ce contrôle, une procédure événementielle Sur Touche relachée
Tu cliques sur les 3 points ... (à droite de la ligne Sur Touche relachée)
Dans ton code tu dois trouver :
Private Sub Texte33_KeyUp(KeyCode As Integer, Shift As Integer)

End Sub

Tu ajoutes les lignes suivantes entre les 2 lignes ci-dessus :

'----------------Début
Select Case KeyCode
Case vbKeyUp, vbKeyDown, vbKeyLeft, vbKeyRight
Exit Sub
Case Else
Me.Liste25.RowSource = "SELECT * FROM Articles WHERE & "([Article])
like '" & Me.Texte33.Text & "*'"
'Il faut peut-être que tu modifies la requête ci-dessus, si elle ne
correspond pas à celle que tu utilises
'Le nom de la table est-il "Articles"?
'Le nom du champ recherché est-il "Article"?
Me.Liste25.Requery
End Select
End Sub
'---------------Fin

Petites observations complémentaires :
Evite d'utiliser des caractères spéciaux (comme °) ou accentués dans les
noms de tes contrôles. C'est vrai qu'en principe ça fonctionne, mais ça peut
aussi être la source de problèmes.
Tu peux renommer les contrôles que tu utilises. Texte33 ou Liste25, ça n'est
pas très parlant, alors que ListeNoms ou NomVille ou ce que tu veux, c'est
plus facile à gérer quand tu as 50 contrôles Texte1 à Texte50.

Cordialement

--
Gilbert


"Jean-Marcel" a écrit dans le message
de news:
Bonjour,
Il n'y en a pas car c'est un contrôle indépendant créé à partir de zone de
liste de la boîte à outils, zone de liste qui reprend les enregistrements
de

la table "Articles"par une instruction SQL créée sous la ligne contenu de
la

feuille de propriétés ce qui donne le code que j'avais écrit ci-dessous.
Je sens que ça se complique pour toi, si trop on laisse tomber, tant pis.

Merci encore.
Jean-Marcel


Bonjour,

Quelle est le ControlSource (Source controle) de ta liste (Liste25)?

--
Gilbert


"Jean-Marcel" a écrit dans le
message


de news:
Bonjour Gilbert,
Merci pour ta bonne volonté. Malheureusement, je n'y arrive pas car je
ne



sais pas comment insérer mes données dans le code que tu me donnes.
Mon formulaire "Articles Form" comporte le champ texte "Article" avec
son




ID "N° A".
Il y a aussi sur mon formulaire le champ indépendant zone de liste
"Liste25"
qui affiche la totalité de mes articles et qui me permet, avec le code
que



j'ai indiqué ci-dessous, de rechercher et de sélectionner celui que je
veux
afficher.
D'après ce que je comprends, je devrai créer un contrôle indépendant
zone



de
texte
(qui s'appellerai Texte33) pour y greffer, sur touche relâchée, le
code



que
tu m'as écrit.
Si je n'abuse pas trop, pourrais-tu compléter ton code avec le nom de
mes



champs/contrôles ?
D'avance merci.

Jean-Marcel

Bonjour,
L'exemple que je t'ai donné te permet de réduire l'affichage de la
liste




aux
enregistrements dont le champ recherché commence par les caractères
saisis.
Si tu tapes A, ta liste n'affichera que les enregistrement dont le
champ




recherché commence par A
Si tu ajoutes B, ta liste n'affichera plus que les enregistrement
dont le




champ recherché commence par AB
etc...
Il te suffit d'ajouter un controle Zone de texte à ton formulaire et
d'ajouter le code que je t'ai donné dans l'évènement Sur touche
relachée




(en
adaptant bien sur les noms de champ, de controle et le texte de la
requete.

--
Gilbert


"Jean-Marcel" a écrit dans le
message
de news:
Bonjour Gilbert,
Tout d'abord merci de votre renseignement et excusez-moi de ne pas
avoir
répondu plus tôt. (On ne fait pas toujours ce qu'on veut !)
Si je peux me permettre de donner ci-dessous le code que j'ai
actuellement
pour qu'en sélectionnant un article dans la liste celui-ci
apparaisse,





en
regard, dans mon formulaire

Private Sub Liste25_AfterUpdate()
'Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[N° A] = " & Str(Me![Liste25])
Me.Bookmark = rs.Bookmark
End Sub

et vous demander comment je devrais insérer ce que vous proposez
pour





qu'au-lieu du premier caractère seulement, la sélection se fasse
sur 3





caractères par exemple.

J'espère ne pas abuser de votre amabilité et vous en remercie
d'avance.






Jean-Marcel



Bonjour,

Voici ce que j'utilise qui permet de réduire le contenu de la
liste






aux
valeurs commençant par les lettres tapées.

Un champ texte indépendant et dans l'évènement Sur touche relachée
de






ce
champ

Private Sub ChoixNoms_KeyUp(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyUp, vbKeyDown, vbKeyLeft, vbKeyRight
Exit Sub
Case Else
Me.Listedenoms.RowSource = "SELECT .............. WHERE &
"([LeChampQuiVaBien]) like '" & Me.ChoixNoms.Text & "*'"
Me.Listedenoms.Requery
End Select
End Sub


--
Gilbert


"Jean-Marcel" a écrit dans
le






message
de news:
Dans mon formulaire "Articles", j'ai une liste (zone de liste -
indépendant)
qui me facilite la recherche de mes articles. Si je tape par
exemple







la
lettre "p" dans cette liste, le curseur va chercher le premier
article
commençant par "p". J'aimerai pouvoir affiner ma recherche en
tapant







2
voire
3 lettres , par exemple "pre" et que le curseur se mette sur le
premier
article commençant par "pre". Cela est-il possible ?

Merci d'avance aux personnes qui sauraient m'indiquer la
procédure







et
meilleures salutations à toutes et à tous.

Jean-Marcel