lister toutes les valeurs différentes d'une colonne

Bonjour tout le monde!!
Bon je souhaiterais une petite aide sur qqchose d'assez facile je pense, et qui pourtant me pose des prb...
j'explike:
G une colonne avec différents numéros de clients dedans (certains en double).
et je voudrais avoir la liste de tous les différents numéros de clients sur une autre feuille.

Ma méthode:
je scanne toutes les lignes et j'inscrit ce numéro s'il n'existe pas deja sur mon autre feuille... basique.

Mais je ne sais pas pourquoi cette méthode bug pour un seul numérode client qui se retrouve en double....
En gros auriez vous une autre méthode en utilisant les filtre pe...
merci d'avance.





_______________
www.arsenal.fr.st

Salut,
Donne nous ton code, je pense que ce sera mieux et les controles que tu utilises.

bonne prog
liquide

Es-tu sûr que le nom est bien différent ?
Pas d'espace en trop ?

bon en fait je viens de trouver le bug.... C un truc con et assez gênant
voici le style de la fonction que j'utilise:

Public Function seek_Area(Code_P As String) As String

Dim lacase As Range
Dim max_l As Integer
Dim plage As String
Dim adresse As String

If Code_P <> "" Then
W_Ref.Activate
W_Ref.Sheets(3).Activate

max_l = W_Ref.Sheets(3).UsedRange.Rows.Count
plage = "b1:b" & max_l

With W_Ref.Sheets(3).Range(plage)
Set lacase = .Find(Code_P, LookIn:=xlValues)
End With

If lacase Is Nothing Then
seek_Area = "Inconnue"
Else

adresse = lacase.Address
adresse = "$a" & Mid(adresse, 3)
seek_Area = W_Ref.Sheets(3).Range(adresse).Value

End If
End If
End Function

et le problème est que je ne sais pouquoi mais lorsque le numéro de client est plus petit que les autres genre: "100" au lieu de "1200" d'habitude je me retrouve avec un "0100" et donc il ne trouve jamais le 100...
voili voilou merci qd mm les gars...


_______________
www.arsenal.fr.st