Doublons dans deux colonnes de longueur différente

Bonjour,
Avec une macro comme ceci, tu devrais t'en sortir :

Sub doublons_mails()
Dim ligne, ligne2 As Integer
Dim mail, mail2 As String

For ligne = 1 To Range("A65536").End(xlUp).Row
mail1 = Cells(ligne, 1)
    For ligne2 = 1 To Range("B65536").End(xlUp).Row
    mail2 = Cells(ligne2, 2)
    
    If mail1 = mail2 Then
        Cells(ligne2, 3) = "Présent dans colonne A"
    End If
    
    Next
Next
End Sub 

A+ !

Merci Gyrus, ça me semble être presque ça, mais ne faut il pas figer quelque chose dans la formule avec des $ ? En l'état ça m'indique que tous mes mails sont "PRESENT DANS COLONNE A"

D'après ton énoncé, la formule que je t'ai donnée devrait donner le bon résultat, à savoir identifier les mails de la colonne B présents dans la colonne A.

=SI(NB.SI(A:A;B1)>0;"PRESENT DANS COLONNE A";"")

Si ce n'est pas le cas, il faut chercher pourquoi la formule ne donne pas le résultat attendu.
Avec un exemple, ce serait plus facile.

A+

Bonjour,

Une des solutions serait de procéder comme suite
Va das ta colonne C et appliquer la formule suivant:
=Si(A2=B2;"Doublons";"unique")

Vous incrémentez ensuite la formule sur toute la colonne.

Ensuite vous sélectionner la première de votre table pour y appliquer un filtre automatique (Données ==> Filtre)

Ensuite vous allez filtrer votre tableau sur la colonne C en cochant uniquement "Doublon".

Vous avez maintenant que les lignes contenant les doublons qui s'affichent.

Si vous voulez supprimer ces lignes il suffit de les sélectionner et de les supprimer!

Vous enlevez les filtre en cliquant une nouvelle fois sur le bouton de filtre.

Maintenant le tour est joué!!

Bon courage!