ListBox affiche resultat dans label

[wrap food]

Bonjour

J'aurais besoin d'aide sur le problème suivant .

J'ai un ListBox dans lequel j'ai plusieurs choix, jusque la rien de compliqué .....
Je souhaiterais, que lorsque l'on sélectionne l'un des choix apparaisse dans un label, le descriptif correspondant qui est dans une feuille du même fichier .

Ma question n'étant, peut êtres pas claire, je joins un fichier pour que cela soit plus explicite.

Par avance merci de votre aide

Cdt

 

[BOISGONTIER]

Re : ListBox affiche resultat dans label

Bonsoir,

Private Sub ListBox1_Click()
Me.Label1.Caption = Me.ListBox1
Range("A15") = ListBox1.Value
End Sub


JB

 

[laetitia90]

Re : ListBox affiche resultat dans label

bonjour 🙂

j'utiliserai listbox.list a la place de listbox.rowsource plus "souple" a mon avis

 

[wrap food]

Re : ListBox affiche resultat dans label

Merci beaucoup

 

[wrap food]

Re : ListBox affiche resultat dans label

Bonjour

Je suis désolé mais j'ai encore une petite question .

je souhaite ajouter un Label(2) qui va afficher un deuxième éléments qui est dans la même feuille que le premier éléments .

je joins un fichier pour que cela soit plus explicite

Par avance merci de votre aide

Cdt

 

[laetitia90]

Re : ListBox affiche resultat dans label

re tous 🙂

pas grand chose a faire en + dans ce cas la

Private Sub UserForm_Initialize()
ListBox1.List = Feuil2.Range("a15:c" & Feuil2.Cells(Rows.Count, 1).End(3).Row).Value
ListBox1.ListIndex = 1
End Sub
Private Sub ListBox1_Click()
Label1 = ListBox1.List(ListBox1.ListIndex, 1)
Label2 = ListBox1.List(ListBox1.ListIndex, 2)
[a15] = ListBox1
End Sub

la listbox.liste va jusqu'a c au lieu de b
rajouter un label2 dans user...