Private Sub UserForm_Initialize()
'Choix Equipe
Set C1 = Range("A2:A6")
Set C2 = Range("B2:B49")
For Each V_C In C1
ComboBox1.AddItem V_C
Next
'suite
For Each V_C In C2
ComboBox2.AddItem V_C
ComboBox3.AddItem V_C
Next
ComboBox1.MatchRequired = True
ComboBox2.MatchRequired = True
ComboBox3.MatchRequired = True
End Sub