karşılaştırma

[ali veli]

Selam arkadaşlar.Benim ekte de gönderdiğim liste var,iki ayrı isim sütunu isimler birbiriyle aynı fakat bazı isimler diğer listede yok.Benim yapmak istediğim yada sizden isteğim nasıl bir şey yaparak bu isimleri eşleştirebilirim.Yani birbirinin aynı isimler aynı satıra gelecek, birinde olan isim diğerinde yoksa isim sıralaması bozulmadan karşısı boş kalacak.

 

[saltan]

daha kapsamlıda yapabilirdim ama macrolarla oynayarak istediğin gibi değiştirebilirsin

 

[veyselemre]

Sub sirala()
On Error Resume Next

For x = 1 To [a65536].End(3).Row
    bul = [c:c].Find(what:=Cells(x, 1), lookat:=xlWhole).Row
    If bul > 0 Then
        Cells(bul, 3).Cut
        Cells(x, 2).Select
        ActiveSheet.Paste
    End If
Next x

For x = 1 To [c65536].End(3).Row
    If Cells(x, 3) <> "" Then
        Range(Cells(x, 1), Cells(x, 2)).Insert shift:=xlDown
        Cells(x, 3).Cut
        Cells(x, 2).Select
        ActiveSheet.Paste
    End If
Next x
End Sub