Delete duplicates from VBA Combobox

[DeepBlue1]

Hi Everyone,

I've got a list of ticket number in my excel and some of them are duplicates, which is not a problem.
But I don't want to see these duplicates in my Combobox drop down list.

Does anyone have a clue on this ? I've already written a code but it doesn't work.

Private Sub UserForm_Initialize()

Dim D As IntegerFor D = 5 To Range("I10").End(xlUp).Row
Me.Cbx_ticket = Range("I" & D)If Me.Cbx_ticket.ListIndex = -1 Then Me.Cbx_ticket.AddItem Range("I" & D)
Next D

Me.Label_info.Caption = Sheets("Config").Range("e24")
End Sub