Veri karşılaştırma

[kelimex]

Merhaba kolay gelsin...

Ekli dosyada veri karşılaştırma ile ilgili sorum yer almaktadır.

Yardımcı olacak arkadaşlara şimdiden çok teşekkürler...

 

[hamitcan]

Aşağıdaki kodu dener misiniz?

Sub BULx()
    For i = 3 To [d65536].End(3).Row
    Set BUL = Columns(1).Find(Cells(i, "d"), lookat:=xlWhole)
    If Not BUL Is Nothing Then Cells(BUL.Row, 2) = "X"
    Next
    For i = 3 To [f65536].End(3).Row
    Set BUL2 = Columns(1).Find(Cells(i, "f"), lookat:=xlWhole)
    If Not BUL2 Is Nothing Then Cells(BUL2.Row, 3) = "X"
    Next
End Sub

 

[aydogankemal]

DÜŞeyara

doyanı tekrar düzenledim
inceler misin
umarım olmuştur.
eğer ingilizce excel kullanıyorsan formüldeki DÜŞEYARA kelimesini VLOOKUP olarak değiştirebilirsin

 

[kelimex]

Hamitcan Bey çok teşekkür ederim...

Elinize, emeğinize sağlık...

Aydoğan Bey, dosyayı eklemeyi unutmuşsunuz sanırım. Size de çok teşekkür ederim.

Saygılarımla,

 

[aydogankemal]

Dosya Eklİ Durumda.kontrol Ettİm ÇaliŞiyor Tekrar Dener Mİsİn