fixing code populate data in multiple textboxes based on multiple comboboxes

[abdelfattah]

hello

I need help about find way to populate data in textbox based on select from combo box it works only combobox1 & textbox1
what I want the rests of combobox when I select item then populate in textbox

Private Sub ComboBox1_Change()
 Me.TextBox1.Value = Sheets("Sheet1").Range("e" & Me.ComboBox1.ListIndex + 2).Value
 Me.TextBox2.Value = Sheets("Sheet1").Range("e" & Me.ComboBox2.ListIndex + 2).Value
 Me.TextBox3.Value = Sheets("Sheet1").Range("e" & Me.ComboBox3.ListIndex + 2).Value
 Me.TextBox4.Value = Sheets("Sheet1").Range("e" & Me.ComboBox4.ListIndex + 2).Value
End Sub


Private Sub UserForm_Initialize()
With Sheets("Sheet1")
      Me.ComboBox1.List = .Range("b2:b" & .Range("A" & Rows.Count).End(xlUp).Row).Value
       Me.ComboBox2.List = .Range("b2:b" & .Range("A" & Rows.Count).End(xlUp).Row).Value
       Me.ComboBox3.List = .Range("b2:b" & .Range("A" & Rows.Count).End(xlUp).Row).Value
      Me.ComboBox4.List = .Range("b2:b" & .Range("A" & Rows.Count).End(xlUp).Row).Value
   End With
End Sub

thanks

 

[Fluff]

Either put your Combo change event code into a command button, or just populate each textbox from the relevant combo change event.

 

[abdelfattah]

much appreciate , it successes

 

[Fluff]

You're welcome & thanks for the feedback.