iki farklı Sayfa sorgusu

[webuyeislemleri]

Bende iki Excel sayfası var.

Sayfa1 deki A kolonunu kaynak olarak kullanarak Sayfa2 A kolonunu sorgulayacak. Çünkü farklı satırlarda aynı stok kodlu ürünler var.

Sonra Sayfa1 ile Sayfa2 verileri eşit olan kayıtların Sayfa1 deki E hücresindeki değeri Sayfa2 deki C hücresine yazacak.

bunun için nasıl bir yol izlemeliyim.

http://www.excel.web.tr/f14/iki-ayri-tablo-ve-farklari-t55397/sayfa3.html konuyu inceledim fakat içinden çıkamadım.

 

[leumruk]

Selamlar,

Sub Basla()
Set s1 = Sheets("Sayfa1")
Set s2 = Sheets("Sayfa2")
For x = 1 To s2.[a65536].End(3).Row
    If s1.Cells(x, "a") = s2.Cells(x, "a") Then
        s2.Cells(x, "c") = s1.Cells(x, "e")
    End If
Next
End Sub

 

[webuyeislemleri]

Tşk.
sizin yaptığınız çalışmada Sayfa1 ile Sayfa2 aynı satırlar olmak şartı var,

benim istediğim Sayfa2 farklı satırlarda ki kayıtları bulması lazım.

 

[leumruk]

Merhaba,
Aşağıdaki kodu deneyiniz.

Sub Basla()
Set s1 = Sheets("Sayfa1")
Set s2 = Sheets("Sayfa2")
For x = 1 To s2.[a65536].End(3).Row
    For y = 1 To s1.[a65536].End(3).Row
    If s1.Cells(y, "a") = s2.Cells(x, "a") Then
        s2.Cells(x, "c") = s1.Cells(y, "e")
    End If
    Next
Next
End Sub

 

[webuyeislemleri]

ok. çok teşekkür. eline sağlık.