XL 2013 recherche vba approfondi

alexis19981998

XLDnaute Nouveau
bonjour ou bonsoir

comment je peut faire pour que quand la listbox mes les diffèrent mot de la lettre que Jai mi dans la textbox
quand je clique sur un des nom de la listbox je tombe directement sur le mot

exemple : je mes a dans la textbox "a" dans la listbox il y a alexis Alexandre alexandra et que je clique sur alexis qui est en A45 l'ascenseur descend tout seul et le nom et en couleur

Merci
 

Pièces jointes

  • 33RY6.xlsx
    15.2 KB · Affichages: 38

BOISGONTIER

XLDnaute Barbatruc
Re : recherche vba approfondi

Bonjour,

Recherche intuitive avec un combobox seulement


-Pour sélectionner, frapper des lettres contenues dans l'item cherché (fr pour France)

-Pour obtenir la liste complète des noms faire un double-clic.
Code:
Private Sub ComboBox1_Change()
 If Me.ComboBox1 <> "" Then
  a = Application.Transpose(Sheets("BD").[Liste])
  Me.ComboBox1.List = Filter(a, Me.ComboBox1.Text, True, vbTextCompare)
  Me.ComboBox1.DropDown
  [e2] = Me.ComboBox1
 End If
End Sub

Sans titre.png


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

JB
 

Pièces jointes

  • ListeIntuitiveTableurFilter.xls
    128.5 KB · Affichages: 41
  • Sans titre.png
    Sans titre.png
    10.9 KB · Affichages: 26
Dernière édition:

Statistiques des forums

Discussions
284 906
Messages
1 864 038
Membres
155 741
dernier inscrit
khayal boutaina
Haut Bas