Recherche directe dans à partir d'une longue liste déroulante

chatouille36 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention   -  
Raymond PENTIER Messages postés 58989 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Mise en situation : j'ai fait une liste déroulante et cette HYPER grande liste est impossible à mettre en ordre alphabétique car parfois il y a des articles devant les noms principaux : la,la,les........

lorsque je suis dans mon fichier....et que je clique sur la petite flèche qui me permet de voir ma liste déroulante, y a-t-il une façon de faire une recherche en inscrivant, en partie, le nom principal et qu'Excel m'apporte ce qui se rapproche le plus de ce que je recherche ??

Merci !!!!!

5 réponses

Réponse 1 / 5
Vaucluse Messages postés 26496 Date d'inscription   Statut Contributeur Dernière intervention   6 438
 
Bonjour
voyez ce modèle qui semble correspondre à ce que vous demandez

https://www.cjoint.com/c/EImlE0T31yr

il ulise la colonne B comme intermédiaire de codage pour
détecter les textes à conserver

On peut faire varier ce codage pour détecter n'importe quelle partie du texte en E2 plutôt que les premières lettres

les explications sont dans le modèle

Par exemple écrire al ne peut détecter que les textes qui commencent par al, mais on pourrait avec une variante détecter tout et seulement ce qui contient al

par exemple, dans la même liste:
usine d'aluminium
rue des alouettes
place de l'allégorie
allée du roi
ect..

revenez si besoin

crdlmnt

Errare humanum est, perseverare diabolicum
3
Réponse 2 / 5
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
Bonjour

Pour compléter (un peu) la proposition (une variante) de Vaucluse que je salue amicalement
B2=SI($E$2="";"";SI(ESTERR(TROUVE($E$2;A2;1));"";SI(TROUVE($E$2;A2;1);MAX($B$1:B1)+1;"")))
à tirer vers le bas, permet de limiter la liste de validation aux cellules contenant l'expression en E2

Cordialement
0
Vaucluse Messages postés 26496 Date d'inscription   Statut Contributeur Dernière intervention   6 438
 
Salut CCM

... où peut être un peu plus simplement en B2:

=SI(NB.SI(A2;"*"&B2&"*");MAX($B$1:B1)+1;"")

Crdlmnt
0
Réponse 3 / 5
Boisgontierjacques Messages postés 175 Date d'inscription   Statut Membre Dernière intervention   64
 
Bonsoir,

Il faut utiliser la recherche intuitive (type Google)

http://boisgontierjacques.free.fr/fichiers/DonneesValidation/DVSaisieIntuitiveComboBox.xls

La liste n'a pas besoin d'être triée

Boisgontier
http://boisgontierjacques.free.fr
0
Réponse 4 / 5
Boisgontierjacques Messages postés 175 Date d'inscription   Statut Membre Dernière intervention   64
 
Bonjour,

Pour une recherche avec les lettres contenues dans l'item cherché

Dim a()
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect([A2:A16], Target) Is Nothing And Target.Count = 1 Then
a = Application.Transpose(Sheets("bd").Range("liste"))
Me.ComboBox1.List = a
Me.ComboBox1.Height = Target.Height + 3
Me.ComboBox1.Width = Target.Width
Me.ComboBox1.Top = Target.Top
Me.ComboBox1.Left = Target.Left
Me.ComboBox1 = Target
Me.ComboBox1.Visible = True
Me.ComboBox1.Activate
'Me.ComboBox1.DropDown ' ouverture automatique au clic dans la cellule (optionel)
Else
Me.ComboBox1.Visible = False
End If
End Sub

Private Sub ComboBox1_Change()
If Me.ComboBox1 <> "" And IsError(Application.Match(Me.ComboBox1, a, 0)) Then
Me.ComboBox1.List = Filter(a, Me.ComboBox1.Text, True, vbTextCompare)
Me.ComboBox1.DropDown
End If
ActiveCell.Value = Me.ComboBox1
End Sub

http://boisgontierjacques.free.fr/fichiers/DonneesValidation/DVComboBoxIntuitif_lettresContenues.xls

Boisgontier
0
chatouille36 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
Merci Monsieur...premierement mon Excel 2010 est en français et deuxièmenent je ne suis pas familière avec les macros....serait-il possible de m'expliquer plus en détail comment faire ??????.....merci :)
0
chatouille36 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
Voici un lien où j'ai mis mon fichier...serait-il possible de me faire le ''combobox'' à partir de ce fichier ?....merci...la liste déroulante doit être dans l'onglet ''dépôt'' sous le titre ''NOM''
https://www.cjoint.com/c/EIqwDU6kavR

Merci !!!
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 5
Boisgontierjacques Messages postés 175 Date d'inscription   Statut Membre Dernière intervention   64
 
>premierement mon Excel 2010 est en français

Le mien aussi!

-Créer un combobox:
-Onglet développeur
-Insérer ActiveX ComboBox
-Propriétés du ComboBox: MatchEntry à None

(voir copie écran dans fichier du post précédent)

Code:
-Clic-droit sur le nom d'onglet
-Visualiser le code
-Copier/coller du code

Boisgontier
http://boisgontierjacques.free.fr
0
chatouille36 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
Ouffff je crois bien que je suis nulle....il faut que je me positionne OU ?? pour faire cela ?
0
Raymond PENTIER Messages postés 58989 Date d'inscription   Statut Contributeur Dernière intervention   17 353 > chatouille36 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
Chatouille, comme moi, tu n'y connais rien en macros.
Alors, en attendant que tu découvres le langage VBA, contente-toi d'utiliser la formule de Vaucluse.
0

Discussions similaires

Annuaire portable gratuit à partir d'un nom
dani26 -
Authority -

9 réponses
Suppression listes déroulantes
Archa -
Sam -

5 réponses
Supprimer liste déroulante Excel
SamAlex -
b@bd -

8 réponses
Effacer le contenue d'une cellule avec liste déroulante
lebutters -
lebutters -

7 réponses