Bu şablon, iki hücredeki kelimeyi karşılaştırır ve aralarındaki farkı tek bir sayı olarak verir. Karşılaştırma, VBA ile yazılmış FarklariBul fonksiyonu üzerinden yapılır. Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.
Örneğin "ExcelDepo" ve "ExcelDestek" karşılaştırıldığında farklı harfler (stek) bulunur ve sonuç 4 olarak döner.
Formül, FarklariBul fonksiyonunun ondalıklı sonucunu INT ile tam sayıya çevirir. Fonksiyon ondalıklı değer üretebildiği için sonuç aşağı yuvarlanarak gösterilir.
Örneğin "ExcelDepo" ve "ExcelDestek" karşılaştırıldığında farklı harfler (stek) bulunur ve sonuç 4 olarak döner.
Dosyanın içeriği
- Sheet1: A1:C4 aralığını kullanan tek sayfadır. A1 ve B1 hücrelerine karşılaştırılacak kelimeler girilir, C1 hücresi farkın sayısını gösterir.
Kullanılan formüller
C1 hücresinde şu formül bulunur:=INT(FarklariBul(A1,B1))
Makrolar
Dosyada Module1 modülü içinde tek bir fonksiyon vardır: FarklariBul. Makro düğmeyle çalıştırılmaz, hücreye formül olarak yazılarak kullanılır.- Kaynak ve hedef kelimeyi harf harf karşılaştıran bir mesafe tablosu kurar.
- Silme için 1, ekleme için 1,1, harf değiştirme için 1,1 ve iki harfin yer değiştirmesi için 1,2 maliyet kullanır.
- Kelimelerden biri boşsa sonuç, diğer kelimenin uzunluğuna göre hesaplanır.
- En düşük toplam maliyeti sonuç olarak döndürür.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- A1 hücresine birinci kelimeyi, B1 hücresine ikinci kelimeyi yazın.
- Fark sayısı C1 hücresinde otomatik hesaplanır.
- Daha fazla çift karşılaştırmak için C1 hücresindeki formülü aşağı kopyalayıp ilgili satırlara kelimeleri girin.
- Dosyayı makro içerdiği için .xlsm biçiminde kaydedin.