• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Excel - 2 Sütun karşılaştırma

Katılım
3 Haziran 2016
Mesajlar
3
Excel Vers. ve Dili
2015-English
Arkadaşlar iyi forumlar,

Elimde 2 sütun var ben bu sütunda yazanları başka bir sütuna aynı olanları yazmasını istiyorum. Nasıl yapabiliriz.

Excel 2015 - İngilizce
 
biraz daha açabilirmisiniz

Örnek ; A ve B sütunum'da sayılar var her 2 sütunda'da aynı sayılar var ise sarı olarak işaretlenen sütunda yazmasını istiyorum

7vP3zW.png
 
Sayfa adını sağ tıklatıp "Kod Görüntüle" seçin. Açılan boş sayfaya aşağıdaki kodları kopyalayın.
Kodları çalıştırmak için;
İmleç kodların herhangi bir satırında iken F5 tuşuna basarak kodları çalıştırın.

Kod:
Sub AynilariBul()
    Dim bak As Long
    Dim Bulunan As String
    On Error Resume Next
    For bak = 1 To Cells(Rows.Count, "A").End(3).Row
        Bulunan = Range("B:B").Find(What:=Cells(bak, "A").Text, LookAt:=xlWhole).Text
        If Not Err.Number > 0 Then
            Cells(Cells(Rows.Count, "D").End(3).Row + 1, "D").Value = Bulunan
        End If
        Err.Number = 0
    Next
End Sub
 
Teşekkür ederim.
 
Geri
Üst