With Worksheets("Inputs") Me.ComboBox2.List = .Range("D3:D" & .Range("D65536").End(xlUp).Row).Value Me.ComboBox3.List = WorksheetFunction.Transpose(.Range("E2:G2").Value) End With
Private Sub ComboBox2_Change() dis_moi Worksheets("Inputs") End Sub Private Sub ComboBox3_Change() dis_moi Worksheets("Inputs") End Sub Private Sub dis_moi(F As Worksheet) If ComboBox2.ListIndex -1 Or ComboBox3.ListIndex -1 Then Exit Sub TextBox1.Text = F.Cells(ComboBox2.ListIndex + 3, ComboBox3.ListIndex + 5).Value End Sub
j'ai cree deux ComboBox (ComboBox2 et ComboBox3)
Dans ma TextBox6 je voudrais faire apparaitre la valeur correspondant a la jonction de la valeur des 3 ComboBox.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionWith Worksheets("Inputs") Me.ComboBox3.AddItem .Range("E2").Value Me.ComboBox3.AddItem .Range("F2").Value) Me.ComboBox3.AddItem .Range("G2").Value) End With
Me.ComboBox2.List = Range("D3:D" & Range("D65536").End(xlUp).Row).Value Me.ComboBox3.List = WorksheetFunction.Transpose(Range("E2:G2").Value)