recherche doublon dasn 2 feuilles

Bonjour David

je voudrais comparer la colonne A des 2 onglets et rechercher tous les
C'est à dire "Pointer les login de feuille 1 que l'on retrouve dans

feuille 2, puis Pointer les login de feuille 2 que l'on retrouve dans
feuille1 " ?

Je recopie la réponse faite à Daniel qui a posté la même question 1/2h
plus tard. Solution sans macro.
Le mieux est de nommer tes colonnes A. Par exemple ref1 (col A de
feuille1) et ref2 (col A de feuille2)
Dans la feuille 1 en F1 tu écris : Doublon. En H1 tu écris : Doublon
(Oui oui, en F1 et en H1)
En F2 tu écris et recopie vers le bas :
=SI(ESTERREUR(EQUIV(A1;ref2;0));"Absent de feuille 2";"Présent dans
feuille 2")
En H2 tu écris : Présent dans feuille 2

Dans la feuille 2 en E1 tu écris Doublon
En E2 tu écris et recopie vers le bas :
=SI(ESTERREUR(EQUIV(A1;ref1;0));"Absent de feuille 1";"Présent dans
feuille 1")

Dans la feuille 1 : Données - Filtre - Filtre élaboré
Plages : sélectionne ta plage de données de feuille 1
Zone de critère : sélectionne H1:H2
Coche extraction sans doublon
OK

Il ne te reste plus qu'à copier la plage filtrée (éventuellement sans la
colonne F) vers ta 3ème feuille

Cordialement
Trirème

Bonjour,

on m'a demandé de rechercher des doublons dans 2 onglets différents ..j'ai
commencé à la main mais vu le nombre de ligne..j'ai laché l'affaire.. voici
mon cas :

1er onglet :
A B C D E
login nom prénom adresse téléphone


2ème onglet :
A B C D
login logiciel n°machine n° ecran

je voudrais comparer la colonne A des 2 onglets et rechercher tous les
doublons.
puis creer un 3ème onglet avec les doublons mais en reprenant également les
colonnes du 1er onglets (et donc le nom l'adresse etc .. du doublon)

je sais que je vous demande beaucoup mais cela me rendrais vraiment service..

merci d'avance..

Salut David
ceci devrait faire l'affaire, modifie seulement le nom des onglets dans la
macro
Youky

Sub Macro1()
nd = 1
For k = 2 To Sheets("Feuil1").[A65000].End(xlUp).Row
For ligne = 2 To Sheets("Feuil2").[A65000].End(xlUp).Row
If Sheets("Feuil1").Cells(k, 1) = Sheets("Feuil2").Cells(ligne, 1) Then
nd = nd + 1
With Sheets("Feuil3")
.Cells(nd, 1) = Sheets("Feuil1").Cells(k, 1)
.Cells(nd, 2) = Sheets("Feuil1").Cells(k, 2)
.Cells(nd, 3) = Sheets("Feuil1").Cells(k, 3)
.Cells(nd, 4) = Sheets("Feuil1").Cells(k, 4)
.Cells(nd, 5) = Sheets("Feuil1").Cells(k, 5)
.Cells(nd, 6) = Sheets("Feuil2").Cells(k, 2)
.Cells(nd, 7) = Sheets("Feuil2").Cells(k, 3)
.Cells(nd, 8) = Sheets("Feuil2").Cells(k, 4)
End With
End If
Next
Next
End Sub

"david.taieb" <davidtaieb@discussions.microsoft.com> a écrit dans le message
de news: DAB0A50F-7FA6-4C32-BF9E-E6096B20F116@microsoft.com...

Bonjour,

on m'a demandé de rechercher des doublons dans 2 onglets différents ..j'ai
commencé à la main mais vu le nombre de ligne..j'ai laché l'affaire..
voici

mon cas :

1er onglet :
A B C D E
login nom prénom adresse téléphone


2ème onglet :
A B C D
login logiciel n°machine n° ecran

je voudrais comparer la colonne A des 2 onglets et rechercher tous les
doublons.
puis creer un 3ème onglet avec les doublons mais en reprenant également
les

colonnes du 1er onglets (et donc le nom l'adresse etc .. du doublon)

je sais que je vous demande beaucoup mais cela me rendrais vraiment
service..

merci d'avance..