excelde karşılaştırma

[wona_52]

arkadaşlar excelde iki sutunu karşılaştırmayı bilen var mı?örneğin a ve b sutunum var ve iki sutunda karışık sıralı ama içlerin de ortak olanlar var.ben bunların bulunup c sutununa yazılmasını istiyorum.bu konuda yardım edebilecek bir arkadaş varsa seninirim şimdiden teşekkürler

 

[İhsan Tank]

arkadaşlar excelde iki sutunu karşılaştırmayı bilen var mı?örneğin a ve b sutunum var ve iki sutunda karışık sıralı ama içlerin de ortak olanlar var.ben bunların bulunup c sutununa yazılmasını istiyorum.bu konuda yardım edebilecek bir arkadaş varsa seninirim şimdiden teşekkürler

merhaba
boş bir module kopyalarak denermisiniz

Option Explicit
Sub aynı_olanlar()
Dim ts, kaplan, trabzonspor
trabzonspor = MsgBox("Aynı Olanları Çıkartayım Mı_?", vbYesNo, "Onay")
If trabzonspor = vbNo Then Exit Sub
kaplan = 1
Range("C1:C65536").ClearContents
For ts = 1 To Cells(65536, "A").End(xlUp).Row
If WorksheetFunction.CountIf(Range("A1:A65536"), Range("B" & ts)) > 0 Then
Cells(kaplan, "C") = Cells(ts, "B")
kaplan = kaplan + 1
End If
Next
MsgBox "Verileri Çıkarttım", vbInformation, "Bitiş"
End Sub

 

[wona_52]

ben artık umudu kesmiştim.çok teşekkür ederim.ben bu makroyu baya zamandır arıyorum.siteye üyeydim ama cevap gelmez diye hiç sormamıştım gerçekten çok teşekkür ederim

 

[İhsan Tank]

ben artık umudu kesmiştim.çok teşekkür ederim.ben bu makroyu baya zamandır arıyorum.siteye üyeydim ama cevap gelmez diye hiç sormamıştım gerçekten çok teşekkür ederim

excelde böyle bir siteye üyesiniz ve cevap gelmez diye düşünüyorsunuz şaşırdım doğrusu
rica ederim
:yazici: