[VBA] ListBox et combo

Bonjour le Forum,

J'ai un souci et je ne sais pas comment m'y prendre

j'ai un fichier avec un tableau

qui? | client | ok/nok|------

pierre | TRM | nok | -----

Jean | TRM | ok | -----

Martin | NMLK | nok | -----

pierre | TRM | ok | -----

Dans mon USF j'ai une combo avec la liste 'client' retrouvé dans une autre feuille (feuille client)

je souhaiterai dans une listBox retrouvé tous les noms (SANS les doublons) du résultat de la combo

pour cette exemple j'aurai donc

dans la combo TRM et dans la listbox pierre (1seule fois) Jean, ...

je ne sais pas écrire ce bout de code,

merci d'avance à tous ceux qui auront la gentillesse de m'aider

bon, pour créer une liste sans doublon, j'ai trouvé comment procéder

voici l'option choisie :

Dim c As Range
Dim tablo()
Dim i As Integer, j As Integer
Dim temp As String
Dim present As Boolean

ReDim tablo(1 To 1)
tablo(1) = Cells(1, 1)
For Each c In Sheets("Feuil1").Range("A1:A" & Range("a65536").End(xlUp).Row)
    present = False
    For i = 1 To UBound(tablo)
        If tablo(i) = c Then present = True
    Next i
    If Not present Then
        ReDim Preserve tablo(1 To UBound(tablo) + 1)
        tablo(UBound(tablo)) = c
    End If
    For i = 1 To UBound(tablo)
        For j = 1 To UBound(tablo)
            If tablo(i) < tablo(j) Then
                temp = tablo(i)
                tablo(i) = tablo(j)
                tablo(j) = temp
            End If
        Next j
    Next i
Next c

ListBox1.List = tablo

Il ne me reste plus qu'a rafraîchir ma liste en fonction de la combo (sans cliquer)

Encore merci d'avance