Hi

change the code (comboxbox1_Change) to below


Private Sub ComboBox1_Change()
    ComboBox2.RowSource = Sheets("sheet1").Range(Range("b2").Offset(0, ComboBox1.ListIndex), _
    Range("b2").Offset(0, ComboBox1.ListIndex).End(xlDown)).Address
End Sub
now you can have whatever values of combobox1 in cells A2 down
and comboxbox2 values B2 to down, C2 to down ...... so on....