Salut David, Kiorys, le Forum
En complément, pour avoir une plage dynamique de "X" colonnes dans la ComboBox :
Private Sub UserForm_Initialize()
Dim c As Range
For Each c In Range("A1", Range("A1").End(xlToRight))
ComboBox1.AddItem c.Value
Next
End Sub
Bon Aprèm
@+Thierry
PS On notera que C as Range est suffisant, inutile dans ce cas de le déclarer as Object, bien plus gourmant en ressource.