liste karşılaştırma

[ofis34]

sayın arkadaşlar

elimde uzun 2 tane isim listesi var.
bunları ekte hem isim e göre sıraladım.hemde üye numarasına göre sıraladım.
bu iki listeyi karşılaştırmak istiyorum.kişilerin iki listede olup olmadığını kontrol etmem gerekiyor .bir kişi iki listede de varsa bunları tesbit etmek istiyorum.
hem üye numarasına göre hemde isme göre ayrı ayrı listelemek istiyorum.
yaklaşık 2 bin kişi civarında tek tek uğraşmak istemedim hemde yeni bir şeyler öğrenmek istiyorum
yardımlarınızı bekliyorum
iyi çalışmaalr,

 

[eskişehirli1]

Liste

dosyanız ektedir. Umarım işinize yarar.

Ekli dosyayı görüntüle liste.xls

 

[1Al2Ver]

Merhaba,

"Mükerrer Kayıt" yada "Mükerrer" diyerek forumda arama yapmanızı öneririm,

Teşekkür ederim.

 

[N.Ziya Hiçdurmaz]

yanıt

Sub karsilastirisim()
Dim sat As Integer
Dim s As Integer
[g2:g1000] = ""
s = 2
For sat = 2 To Cells(65536, "a").End(xlUp).Row
    If WorksheetFunction.CountIf(Range("b2:e" & sat), Cells(sat, "b")) > 1 Then
        Cells(s, "g") = Cells(sat, "b").Value
        s = s + 1
    End If
Next
End Sub

 

[ofis34]

çok teşekür ederim arkadaşlar
elinize sağlık
hayırlı akşamlar

 

[okan özek]

Listede olmayanları nasıl yazdırırız?

Yaptığımız listede düğmeye tıklayınca her iki listede de olanları yazıyor.

Peki biz 1. listede olupta 2. listede olmayanları nasıl yazdırırız?

Bunun makro yazımı için yardım edermisiniz.