Koyu Harf hakkında

[evren_01]

Arkadaşlar birşeyi gerçekten cok merak ediyorum
Koyu (bold) olarak yazılan yazıları formülde kullanmak istersek nasıl olacak?
Örneğin =eğer(koyu ise;1;0) şeklinde olacak bir formülü nasıl yazabiliriz.
Bu arada bu konu ile ilgili başlık tam olarak bulmadım birazda saçma olacağını düşünerek bu şekilde başlık kullandım.Kusura bakmayın
Bu konu hakkında yardımcı olacak arkadaşların yardımını bekliyorum
Şimdiden eğmeği geçen arkadaşlara teşekkür ederim

 

[Necdet]

Merhaba,

Sizin dediğiniz Excelin yerleşik fonksiyonları ile yapılamıyor. Kullanıcı Tanımlı Fonksiyon ile olur, yani VBA ile olur. Aşağıdaki KTF'yi (Kullanıcı Tanımlı Fonksiyonu)

=Koyumu(A1) gibi kullanabilirsiniz. Koyu ise 1 değilse 0 değeri döndürür.

Public Function Koyumu(Hücre)
If Hücre.Font.Bold = True Then
    Koyumu = 1
Else
    Koyumu = 0
End If
End Function

Eklenti olarak eklerseniz tüm Excel dosyalarında kullanabilirsiniz.

 

[Haluk]

Alternatif:


.