Ortak Metin Içeren Hücreleri Renklendirme

[hadromer]

Merhaba,
a sütunu 1500 adet hücre latince isimlerden oluşmaktadır.
A1 : Cymbella affinis
A2 : Cyclotella affinis

gibi isimler var. Ben A1 ve A2 hücrelerinde "affinis" kelimesi ortak olduğu için bu iki hücreyi aynı renk yapmak istiyorum. Bazen ortak kelimeler alt alta değilde birbirinden çok uzak hücrelerde olabiliyor. Böyle bir renklendirme yapmamız mümkün mü ? formül veya makro ile. Teşekkür edeirm.

 

[Korhan Ayhan]

Merhaba,

Birebir eşleşenler renklenecek değil mi?

 

[hadromer]

Merhaba,
Konuyla alakalı çalışmayı manuel olarak gerçekleştirdim. Dolayısıyla bu çalışmaya gerek kalmadı. İlginiz için teşekkür ederim.

 

[Korhan Ayhan]

Ben bir kod hazırlamıştım.

Kendi veriniz de deneyip sonucu bildirir misiniz? Sağlıklı çalışıp çalışmadığını merak ettim.

Harici Link (Silinebilir) ; https://s2.dosya.tc/server14/3pw5d1/Benzer_Kelimeleri_Renklendir.xlsm.html

 

[baydeniro]

Ben bir kod hazırlamıştım.

Kendi veriniz de deneyip sonucu bildirir misiniz? Sağlıklı çalışıp çalışmadığını merak ettim.

Harici Link (Silinebilir) ; https://s2.dosya.tc/server14/3pw5d1/Benzer_Kelimeleri_Renklendir.xlsm.html

Üstad dosyanızı ben denedim. Örneğin ALİ yazınca "Ali, Veli, Hasan, Kemal, Türkan" ı renklendiriyor ama MEHMETALİ yi renklendirmiyor !

 

[Korhan Ayhan]

Doğrudur..

Birebir eşleşmeyi arıyor. Yani içerir mantığı ile arama yapmıyor.

 

[hadromer]

Ben bir kod hazırlamıştım.

Kendi veriniz de deneyip sonucu bildirir misiniz? Sağlıklı çalışıp çalışmadığını merak ettim.

Harici Link (Silinebilir) ; https://s2.dosya.tc/server14/3pw5d1/Benzer_Kelimeleri_Renklendir.xlsm.html

Çok teşekkür ederim. Bu gün deneyip bildireceğim. Emeğinize sağlık .

 

[hadromer]

Doğrudur..

Birebir eşleşmeyi arıyor. Yani içerir mantığı ile arama yapmıyor.

Şöyle örnek vereyim hücrede aradığım benzerlik şöyle. A1 = Ali veli , A50 = Ahmet veli
a1 ve a50 de "veli" ortak olduğu için bu iki hücre aynı renk olacak.

 

[Korhan Ayhan]

Benim bahsettiğim durum aşağıdaki şekildedir;

VELİ
MEYVELİK

Bu iki veri eşleşmez..

 

[hadromer]

Benim bahsettiğim durum aşağıdaki şekildedir;

VELİ
MEYVELİK

Bu iki veri eşleşmez..

benim istediğimde bu zaten hocam. eşleşmesin bu tip bir benzerlikte

Kodunuzu denedim ama hata verdi. Debug kısmına tıkladığımda
"S1.Range(Adres(Kelime_Key(0), 1)).Interior.Color = RGB(Renk_1, Renk_2, Renk_3)" kısmında hata gösterdi. aşağıya örnek bir dosya ekliyorum.

Benzer_Kelimeleri_Renklendir.xlsm dosyasını indir - download

Benzer_Kelimeleri_Renklendir.xlsm dosyasını indir, download. Dosya.tc .Dosya Upload. Dosya Paylaş. Dosya Yükle

s2.dosya.tc

eğer olmuyorsa sizi yormak istemiyorum hocam. İlgilendiğiniz için teşekkür ederim tekrar.

 

[Korhan Ayhan]

Merhaba,

Eklediğiniz dosyayı denedim. Bende hata vermeden sonuç üretti.

 

[hadromer]

Merhaba,

Eklediğiniz dosyayı denedim. Bende hata vermeden sonuç üretti.

Merhaba,
bende şimdi denedim. Teşekkür ederim güzel bir şekilde çalıştı. Kusura bakmayın geç dönüş sağladım. Tekrar teşekkür ederim.