Afficher les uniques

Microquant

XLDnaute Nouveau
Bonjour,

J'ai une colonne A qui contient une liste de nombres incrémentée de 1 en 1 et une colonne B qui contient une partie de ces nombres, comment faire apparaitre dans une colonne B la liste des nombres uniques de la plage AB ,

Colonne A :
10
11
12
13
14
15
16

Colonne B :
10
12
14
15
16

Je voudrais faire apparaitre dans le colonne C :
11
13

Merci d'avance.
 

soft

XLDnaute Occasionnel
Sub NombresUniques()
Dim I As Long, Y As Long, Z As Long, Trouve As Boolean
I = 1
Z = 1
While Range('A' & I) <> ''
Trouve = False
Y = 1
While Range('B' & Y) <> ''
If Range('A' & I).Value = Range('B' & Y).Value Then
Trouve = True
End If
Y = Y + 1
Wend
If Trouve = False Then
Range('C' & Z).Value = Range('A' & I).Value
Z = Z + 1
End If
I = I + 1
Wend

End Sub
 

Dugenou

XLDnaute Barbatruc
Bonjour,

J'arrive trop tard, mais je vous le donne quand même, en formule matricielle (les deux séries de chiffres en D3:D15 et E3:E12) :
{=INDEX($D$1:$D$15;PETITE.VALEUR(SI(NB.SI($E$3:$E$12;$D$3:$D$15)=1;'-';LIGNE($D$3:$D$15));LIGNE()-2);1)}

Cordialement
 

Discussions similaires

Statistiques des forums

Discussions
312 923
Messages
2 093 665
Membres
105 780
dernier inscrit
Autric