listbox et recherche vertical

n3Twork · 26 Juin 2006

Bonjour

J'ai un petit soucis dans mon application j'ai un listbox et je voudrai que lorsque le selectionne une reference dans cette listbox , sa m'affiche dans un textbox (ou label) une valeur par rechercher vertical ...

j'ai fait des recherche sur le forum mais rien de trouvé.

Je ne sais pas si c'est trés clair...

n3Twork · 26 Juin 2006

Bonjour,

Je vous est fait un fichier avec tou le code et le code qu'il me manquerait 🙂

Merci de votre aide

Voila le fichier : http://cjoint.com/?gAlekvIrUe

Hervé · 26 Juin 2006

bonjour fabien, a essayer :

Private Sub ListBox1_Click()
Dim L As Integer
Dim c As Range

L = ListBox1.ListIndex
L = L + 1

With Sheets('Feuil2')
Label12 = .Cells(L, 2)
Set c = .Columns('d').Find(Label12)
If Not c Is Nothing Then Label12 = Label12 & vbNewLine & c.Offset(0, 1)
End With
End Sub

salut

n3Twork · 26 Juin 2006

Merci sa a l'air de bien fonctionner 🙂

listbox et recherche vertical

n3Twork

XLDnaute Occasionnel

n3Twork

XLDnaute Occasionnel

Hervé

XLDnaute Barbatruc

n3Twork

XLDnaute Occasionnel

Discussions similaires

listbox et recherche vertical

n3Twork

XLDnaute Occasionnel

n3Twork

XLDnaute Occasionnel

Hervé

XLDnaute Barbatruc

n3Twork

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency