Bom dia Senhores,

Estou com dificuldades para remover números duplicados na criação de uma combobox.

Por enquanto estou com o seguinte código:

Private Sub UserForm_Initialize()

     lin = 2
    Do Until Plan1.Cells(lin, 11) = ""
         ComboBox1.AddItem Plan1.Cells(lin, 11)
         lin = lin + 1
     Loop
     
    intTotal = Plan1.UsedRange.Rows.Count
      
End Sub

Ele está servindo bem, puxando todos os valores. O problema é quem existem valores repetidos, como faço para apenas aparecer uma ocorrência?

Exemplo: Esse é meu banco de dados:
12
12
12
15
15
15

Como quero que apareça no combobox:

12
15

Agradeço a ajuda desde já.

Bom dia.