je travaille sur excel 2010 en anglais et j'aimerais savoir si il existe une formule qui renvoit les cellules qui n'existe pas dans une colonne de référence. En pièce jointe, vous pourrez retrouver un exemple. J'ai deux colonnes. Ma colonne de référence X et la colonne à tester, la colonne Y. Je voudrais voir si il existe dans ma colonne Y des cellules qui n'existe pas dans ma colonne de référence X.
Veuillez retrouver mon fichier excel en pièce jointe. En voyant le fichier, vous pourrez facilement y répondre.
Bonjour,
en pj deux colonnes : une avec une formule simple qui indique sur chaque ligne la présence d'intrus, une autre (matricielle) qui affiche la liste comme dans ton exemple.
Cordialement
Re Josanche,
cela dépends de ce que vous manipulez comme données et ce qu'on nomme un intrus : avec votre calcul on ne détectera pas un couple absent de la liste mais dont les composants sont présents séparément.
Voir pj
R@chid : si tu continues de copier je le dis à la maitresse !
Dugenou, je vous remercie pour me montrer la différence entre V1 et V2. V2 est bcp plus restrictif et c ce que je recherchais.
Merci job75. mais je pense que la formule de dugenou est plus simple. j'ai testé et ça a résolu mon probleme
Sub Intrus()
Dim temp()
Set MonDico1 = CreateObject("Scripting.Dictionary")
For Each c In Range("a3:a" & [a65536].End(xlUp).Row)
If c <> "" Then MonDico1.Add c.Value, c.Value
Next c
Set mondico2 = CreateObject("Scripting.Dictionary")
For Each c In Range("b3:b" & [b65536].End(xlUp).Row)
If Not MonDico1.Exists(c.Value) Then
If c <> "" Then mondico2.Add c.Value, c.Value
End If
Next c
If mondico2.Count = 0 Then Exit Sub
ReDim temp(1 To mondico2.Count)
i = 1
For Each c In mondico2.items
temp(i) = c
i = i + 1
Next
[e3].Resize(mondico2.Count, 1) = Application.Transpose(temp)
End Sub