Discussion :

[Orakle]

Bonjour,

est-il possible (et je suppose que oui) de pouvoir entrer plusieurs valeurs de recherche dans une même zone de texte, via un séparateur quelconque ?

ex :

une colonne de ma zone de liste contient :

Code :

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

1
2
3
4
5
10
20
30
40
50

Comment procéder si je souhaite ne conserver que 10 et 50 ?

merci

[Mahefasoa]

une colonne de ma zone de liste contient :

Code :

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

1
2
3
4
5
10
20
30
40
50

Comment procéder si je souhaite ne conserver que 10 et 50 ?
i

Bonjour Orakle,

Si ta liste puise ses valeurs depuis une requête ou un table, modifie la requête de manière à ne sélectionner ce que tu veux et le tour est joué.
Par contre, si c'est une liste de valeur, il suffit de manipuler la propriété RowSource de l'objet listbox pour modifier le contenu de la liste (si et seulement si la propriété RowSourceType = "Liste valeurs".

En espérant de t'avoir aidé.

Thierry

[Orakle]

Ma liste récupère ses valeurs depuis une requête SQL basée sur plusieurs critères de recherche de mon Formulaire (zone de texte, Combo) un peu à la manière du tuto de Caféine, donc pas possible de la modifier.

Ce que je veux, c'est pouvoir par exemple dans une zone de texte insérer ce type de recherche : 10;30;50 et qu'elle ne me retourne que les valeurs sélectionnées, un peu à la manière d'Excel quand on fait un tri personnalisé.

[Mahefasoa]

Le contenu de la propriété Contenu de ta zone de liste est-il une requête (avec un nom) ou une instruction SQL? Car qu'il soit une requête ou une instruction SQL, il est toujours possible de la modifier ou de l'interroger encore, mais seulement en gardant le format suivant pour le critère: 10,20,50 et non pas point-virgule:

Code :

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

1
2
 
WHERE champ IN (10,20,50)

[Orakle]

ok merci je vais essayé avec ça.

[Orakle]

bon je viens d'ajouter cette instruction

Code :

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

1
2
3
If Me.ChkTyp Then
SQL = SQL & "AND [SUIVI_N°_SERIE]![TYPOLOGIE] IN ('" & Me.TxtTyp & "') "
End If

mais ça ne fonctionne pas.
valeur = ('20,50')

Comment gérer ma syntaxe correctement ?

[Jeannot45]

L'utilisation des quotes (') dans la syntaxe signifie que le contenu est de type texte.
Pour des valeurs numériques ne pas utiliser les quotes (')

Bonne continuation

[Orakle]

Oui c'est exacte, sauf que dans ma table ce champ était référencé en type de donnée Texte

En changeant le type et sans les quotes effectivement ça fonctionne.

Merci

[Orakle]

Bonjour,

je ré-ouvre ce topic car j'aimerais connaître la syntaxe du comparateur d'exclusion à la manière des exemples ci-dessus.

J'ai déjà testé NOT IN et OUT mais je ne sais pas si c'est ça. En tout cas dans les 2 cas ça ne fonctionne pas.

[Orakle]

Bonjour,

je reviens vers vous car cette fois ci j'ai un problème à l'identique et vu ce qu'il y avait au dessus niveau réponses, j'aurai dû pouvoir résoudre mon affaire rapidement, mais ça ne fonctionne pas.

Cette fois-ci je recherche bien du texte donc application des quotes

Code :

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

1
2
3
If Me.ChkOrigine Then
SQL = SQL & "AND [SUIVI_N°_SERIE]![ORIGINE] IN  ( '" & Me.TxtOrigine & "' ) "
End If

Lorsque je passe un critère tout va bien !
Par contre lorsque je tente d'en insérer un 2e ça ne fonctionne plus

ex :

je passe CN il fonctionne bien le SQL me retourne IN ('CN')
je passe CN,US,FR plus rien ne fonctionne le SQL me retourne IN ('CN,US,FR')

J'ai le sentiment que pour bien faire il devrait me retourner la syntaxe suivante : IN ('CN','US','FR')...... non ?

Merci à vous

[Simplifi]

hello,
je tombe sur ton message en cherchant comment enregistrer le contenu d'une liste multivaluée!
Bon il me semble que ton sentiment est le bon
Tu devrait peut être essayer:

Code :

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

1
2
3
If Me.ChkOrigine Then
SQL = SQL & "AND [SUIVI_N°_SERIE]![ORIGINE] IN  ( '" & Replace(Me.TxtOrigine,",","','") & "' ) "
End If