Çözüldü Hücre sütun karşılaştırması

[ÖmerBey]

Arkadaşlar bir nevi sınav değerlendirmesi yapmak amacıyla şöyle birşey istiyorum.
Ekteki dosyadaki b2 hücresiyle b sütunundaki diğer hücreler harşılaştırılacak ve benzer karakter sayıları c sütununa kaydedilecek boşluklar da karakter olarak sayılacak .
Bunu nasıl yapabilirim yardımcı olabilir misiniz?
Ya da siz yapabilirseniz memnun olurum.
Bu arada excel bilgim temel düzey sayılır. Cevapları ona göre verirseniz sevinirim.

Bu arada karşılaştırma hücresi b2 olmak zorunda değil başka bir sütunun başka bir hücresi de olabilir.

 

[dEdE]

Merhaba,
Ekli dosyayı inceler misiniz?

Sub DogruSay()
For i = 4 To [B65536].End(3).Row
    Puan = 0
    For j = 1 To Len(Cells(2, 2).Value)
        If Mid(Cells(2, 2).Value, j, 1) = Mid(Cells(i, 2).Value, j, 1) Then Puan = Puan + 1
    Next
    Cells(i, 3).Value = Puan
Next
End Sub

 

[ÖmerBey]

Merhaba,
Ekli dosyayı inceler misiniz?

Sub DogruSay()
For i = 4 To [B65536].End(3).Row
    Puan = 0
    For j = 1 To Len(Cells(2, 2).Value)
        If Mid(Cells(2, 2).Value, j, 1) = Mid(Cells(i, 2).Value, j, 1) Then Puan = Puan + 1
    Next
    Cells(i, 3).Value = Puan
Next
End Sub

Bir problem yok gibi istediğim şey de aynen böyleydi çok teşekkür ederim.
Elleriniz dert görmesin, Allah razı olsun

 

[firat35]

merhaba
yeni üyeyim bnde doğru konu başlıgını bulamadım ama öğrenmek istedigim konu ile ilgili yadımlarınızı rica ediyorum şöyle ki; excelde fiyat karşılaştırması yada mukayesesi tablosu nasıl oluşturabilirim. Konu şöyle birden fazla (yaklaşık 50 kadar) ürün var ve 10 kadar marka bulunmakta bu markaların her birinde o ürüne ait en düşük fiyatı x ürünü için hang, marka verdiğini kolay bir yolla nasıl bulabilirim acaba excelde bunu nasıl yapabilirim yada hangi kaynakları inceleyrek bu tabloyu kendi başıma oluşturabilirim iş yerinde yeniyim bu bilgiye ulaşıp yapabilir isem çok iyi olacak. yardımlarınızı bekler şimdiden teşekkür ederim..

 

[dEdE]

Sayın firat35,
Aynı soruyu farklı başlıklarda sorarak forumda kirliliğe yol açmamanızı rica ederim.