liste déroulante avec la première lettre tapé

JCGL

XLDnaute Barbatruc

• 1 Février 2015

• #2

Re : liste déroulante avec la première lettre tapé

Bonjour à tous,

Un essai avec formule

A+ à tous

 

Pièces jointes

• JC devis en finition.xlsx

  63.9 KB · Affichages: 965

Vote positif 0 Vote négatif

M

Modesabo

XLDnaute Nouveau

• 1 Février 2015

• #3

Re : liste déroulante avec la première lettre tapé

Bonsoir,

Ca aide. Il n'y a rien de mieux, une fois le b frappé, la liste apparaît ainsi que les suivants ? Sinon, je prends (mais alors il faudrait m'aider car je n'ai pas trouvé comment faire).

Je suis vraiment très contente de l'aide. Merci, merci, merci.

Modesabo

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 1 Février 2015

• #4

Re : liste déroulante avec la première lettre tapé

Bonjour à tous,

Je suis étonné que cela ne fonctionne pas chez toi...
Si tu tapes le b tu ne dois avoir que les b.

Tes données doivent être triées alphabétiquement.

A+ à tous

 

Dernière édition: 1 Février 2015

Vote positif 0 Vote négatif

G

gae

XLDnaute Junior

• 2 Février 2015

• #5

Re : liste déroulante avec la première lettre tapé

Bonjour XLDnaute merci pour t'on aide
désoler mais cher moi sa ne marche pas.
Je me suis mis sur la cellule G7 validation des données je clic sur le petit carré de droite je me met sur Feuil2! je sélectionne la cellule A3 et je met la formule =DECALER(NOMS;EQUIV($G$7&"*";NOMS;0)-1;;NB.SI(NOMS;$G$7&"*"))
et OK
La sa marque impossible de trouver une plage nommée que vous avez spécifiée.
J'ai aussi vu que tu avais créer un menu déroulant en J7 j'ai fait la même chose, sa me marque encore impossible de trouver une plage ........
Par contre si je désire r'ajouté plusieurs noms (à l'infini) sa ne les prend pas.
A tu une solution pour que je m'en sorte s'il te plait merci

je te souhaite une bonne journée
Gae

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 2 Février 2015

• #6

Re : liste déroulante avec la première lettre tapé

Bonjour Modesabo, Jean-Claude, gae,

Si l'on veut que la liste se déroule automatiquement utiliser une Combobox (contrôle ActiveX) avec ce code :

Code:

Option Compare Text 'pour ignorer la casse

Private Sub ComboBox1_Change()
Dim x$, t, e, n&, a$()
x = Trim(ComboBox1)
With Feuil2 'CodeName de la feuille
  t = .Range("A3", .Range("A" & .Rows.Count).End(xlUp)(4)) 'au moins 2 éléments
End With
For Each e In t
  If e <> "" And e Like x & "*" Then
    n = n + 1
    ReDim Preserve a(1 To n)
    a(n) = e
  End If
Next
If n = 0 Then ReDim a(1 To 1)
ComboBox1.List = a
ComboBox1.DropDown 'déroule la liste
End Sub

Fichier joint.

Edit :

- propriété LinkedCell de ComboBox1 => E8

- propriété PrintObject de ComboBox1 => False, pour ne pas imprimer l'objet

- le fichier doit être enregistré en .xlsm ou .xls

A+

 

Pièces jointes

• devis en finition(1).xls

  226 KB · Affichages: 372

Dernière édition: 2 Février 2015

Vote positif 0 Vote négatif

M

Modesabo

XLDnaute Nouveau

• 2 Février 2015

• #7

Re : liste déroulante avec la première lettre tapé

Oui, c'est le cas mais je frappe "b" puis je dois positionner la souris sur l'ascenseur pour que cela apparaisse. J'aurais aimé frapper "b", que le premier b apparaisse puis avec la flèche vers le bas, trouver le bon nom.
Entre-temps, comment puis adapter ma feuille avec ce que tu as fait ? car je ne trouve pas.

Merci

 

Vote positif 0 Vote négatif

M

Modesabo

XLDnaute Nouveau

• 2 Février 2015

• #8

Re : liste déroulante avec la première lettre tapé

Pardon,

Je n'avais pas lu tous les messages. J'ai donc déjà réponse à ma question.
Je vais tenter d'utiliser une combobox.

Merci.
Bonne journée.

Modesabo

 

Vote positif 0 Vote négatif

M

Modesabo

XLDnaute Nouveau

• 2 Février 2015

• #9

Re : liste déroulante avec la première lettre tapé

Rerebonjour,

Je ne trouve pas comment faire une combobox et les fichiers joins ne se laissent pas sélectionner :-(

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 2 Février 2015

• #10

Re : liste déroulante avec la première lettre tapé

Modesabo à dit:

Je ne trouve pas comment faire une combobox (...)(

Cliquez pour agrandir...

C'est élémentaire :

- sur Excel 2003 : menu Affichage - Barre d'outils - Boîte à outils Contrôles => clic sur Zone de liste déroulante

- sur Excel 2010 : onglet Développeur - Insérer - Contrôles ActiveX => clic sur Zone de liste déroulante.

Puis clic dans la feuille et dessiner la ComboBox.

Dans VBA => Quitter le Mode création.

A+

 

Vote positif 0 Vote négatif

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 2 Février 2015

• #11

Re : liste déroulante avec la première lettre tapé

Bonjour,

Avec Combobox dans formulaire:

-Tous les noms si on clique sur la flèche du comboBox.
-Noms en fonction des premières lettres frappées.

Les noms apparaissent au fur et à mesure de la frappe des caractères comme sur Google.




(cliquer en G7 pour afficher le formulaire)

Code:

Private Sub UserForm_Initialize()
  Me.ComboBox1.List = [liste].Value
End Sub

Private Sub ComboBox1_Change()
  Set d1 = CreateObject("Scripting.Dictionary")
  For Each c In [liste]
    If UCase(c) Like UCase(Me.ComboBox1) & "*" Then d1(c.Value) = ""
  Next c
  Me.ComboBox1.List = d1.keys
  Me.ComboBox1.DropDown
End Sub

Private Sub CommandButton1_Click()
  ActiveCell = Me.ComboBox1
  Unload Me
End Sub

http://boisgontierjacques.free.fr/fichiers/DonneesValidation/ListeIntuitiveTableur.xls
http://boisgontierjacques.free.fr/fichiers/DonneesValidation/ListeIntuitiveTableurContenu.xls
http://boisgontierjacques.free.fr/fichiers/DonneesValidation/DVComboBoxIntuitif.xls
http://boisgontierjacques.free.fr/fichiers/DonneesValidation/ListeIntuitive5.xls
http://boisgontierjacques.free.fr/fichiers/DonneesValidation/ListeIntuitiveFormContenu.xls



JB

 

Pièces jointes

• devis en finition-2.xls

  89.5 KB · Affichages: 231

Dernière édition: 9 Février 2015

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 2 Février 2015

• #12

Re : liste déroulante avec la première lettre tapé

Bonjour à tous,

Modesabo : Tu as des espaces superflus dans ta base Clients...

A+ à tous

 

Vote positif 0 Vote négatif

M

Modesabo

XLDnaute Nouveau

• 2 Février 2015

• #13

Re : liste déroulante avec la première lettre tapé

En colonne ou en ligne ?

J'en reviens à "Comment faire la combobox ?" J'ai suivi les instructions (développeur, etc et XLS me signale que "impossible d'insérer un objet". J'ai essayé dans ma base puis dans le fichier xls envoyé ici et ça ne va ni dans un cas ni dans l'autre.
J'ai aussi essayé l'insertion contrôle de formulaire : ça fonctionnaire.
J'ai vérifié dans les paramètres du centre de gestion de la confidentialité et j'ai opté pour "activer tous les contrôles sans restrictions..."

Que puis-je faire ?

Merci à vous tous pour l'aide.
J'ai déjà montré la liste au bureau, j'ai eu des wouaw et des "mais c'est tout à fait ça qu'on cherche". Nous n'avons plus qu'à ouvrir nos onglets selon nos besoins...

Merci à vous tous pour l'aide.

 

Dernière édition: 2 Février 2015

Vote positif 0 Vote négatif

M

Modesabo

XLDnaute Nouveau

• 2 Février 2015

• #14

Re : liste déroulante avec la première lettre tapé

Merci, j'ai essayé mais j'ai encore un soucis (voir mon message 9). Est-ce encore possible de m'aider ?

Merci

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 2 Février 2015

• #15

Re : liste déroulante avec la première lettre tapé

Re,

Modesabo à dit:

(...) XLS me signale que "impossible d'insérer un objet".

Cliquez pour agrandir...

Peut-être suite à une récente mise à jour d'Excel, alors le remède est ici :

https://www.excel-downloads.com/thr...jour-office-paroles-de-la-maison-mere.226943/

A+

 

Vote positif 0 Vote négatif