resultat d'un combobox

[Nico74]

bonsoir,
Voici mon Pb
J'ai un tableau de 3 colonnes.
Les données de la 1ere colonne alimentent un combobox.
Je voudrais que lorsque je choisi un nom dans le combobox, la valeur de la 3eme colonne correspondant à cette ligne soit renvoyer dans un label.

En esperant avoir ete assez clair ...

 

[Moa]

Dis Nico74 !

La solution que l'on t'a donné dans ton autre post...elle te convient ?

 

[Ludwig]

bonsoir Nico74,

Pour cet exemple tu as besoin d'un UserForm, d'un ComboBox et d'un Label

Dans ta déclaration de ton UserForm écrit ceci:

Dim NomLBindex As Integer

Private Sub ComboBox1_Change()

NomLBindex = ComboBox1.ListIndex + 1
Range("C" & NomLBindex).Select
Label1.Caption = Range("C" & NomLBindex).Text

End Sub

Private Sub UserForm_Initialize()

Dim L As Integer
Dim Plage As String

L2 = Range("A65536").End(xlUp).Row
Plage2 = Range("A1:A" & L).Address
ComboBox1.RowSource = "Feuil1!" & Plage

End Sub

Et voilà

A bientôt

Ludwig

 

[Ludwig]

Rectification, copie plutôt cela

Dim NomLBindex As Integer

Private Sub ComboBox1_Change()

NomLBindex = ComboBox1.ListIndex + 1
Range("C" & NomLBindex).Select
Label1.Caption = Range("C" & NomLBindex).Text

End Sub

Private Sub UserForm_Initialize()

Dim L As Integer
Dim Plage As String

L = Range("A65536").End(xlUp).Row
Plage = Range("A1:A" & L).Address
ComboBox1.RowSource = "Feuil1!" & Plage

End Sub