Eliminar repetidos en un combobox

Soy nuevo programando macros y me encontré con el siguiente problema agradezco su ayuda

El combobox trae los datos de una lista de excel pero necesito hacer que solo me traiga valores únicos si hay repetidos no he podido lograrlo agradezco su orientación anexo el código que estoy utilizando

Option Explicit
Dim ws As Worksheet
Private Sub UserForm_Initialize()
Set ws = Sheets("Dimen")
ComboBoxSerial.List = ws.Range(ws.[c2], ws.[c3].End(xlDown)).Value
End Sub

Private Sub ComboBoxSerial_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Dim Fila As Long
Fila = ComboBoxSerial.ListIndex + 2
TextBoxHerramienta = ws.Cells(Fila, "d")
End Sub

La hoja se llama "Dimen" los datos los tengo en la columna C 

1 2 3 4 4 5 

lo que ue trato de hacer es que el combobox me traiga

1 2 3 4 5 sin que se repita el 4