Hello all,
I have a Userform with 10 combobox's named:
larguratapasol1
larguratapasol2
larguratapasol3
larguratapasol4
larguratapasol5
Combo_CorDeFundotapasol1
Combo_CorDeFundotapasol2
Combo_CorDeFundotapasol3
Combo_CorDeFundotapasol4
Combo_CorDeFundotapasol5
What i need is this but on all combobox's:
Private Sub larguratapasol1_Change()
Select Case larguratapasol1.Value
Case Is = 60
Combo_CorDeFundotapasol1.RowSource = ""
Case Is = 70
Combo_CorDeFundotapasol1.RowSource = "CoresA70"
Case Is = 80
Combo_CorDeFundotapasol1.RowSource = "CoresA80"
End Select
End Sub
Same for 2,3,4,5
Thanks in advance for your help
Bookmarks