AccessTr.neT

Tam Versiyon: Belli aralık dışında sayı yazınca renkli yazması durumu
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Arkadaşlar lafı fazla uzatmadan sadede geleyim. Yardım edenlere şimdiden teşekkürler.

Benim istediğim formülün içeriği şöyle olacak. Mesela bir hücreye 50-100 arasında herhangi bir sayı girildiğinde "siyah" yazacak, fakat bu aralığın dışında bir sayı girildiğinde, "kırmızı" renkte yazacak. 50-100 arası temsili bir değer. Bunu değiştirebilirim tabi sonradan. Aslında basit gibi ama yapamadım. Eğer yapabilen varsa yardımcı olursa sevinirim. Teşekkürler.
Hücreyi seç ve giriş sekmesinde koşullu biçimlendirmeyi seç
Hücre kuralını vurgula-arasında'yı seç 
ilk kutuya 50 ikinci kutuya 100 yaz 
Biçim açılan kutuya tıkla ve en altta özel biçim var oradan istediğin şekilde düzenle
sayın youngeagle_3,


Aşağıdaki kodlamayı boş bir Excel uygulaması açıp Visual Basic (Alt + F11) kod sayfasına geçip buradan Sayfa1’i seçip yapıştır işaretlemesi ile kodlamayı dahil ediniz.ardından da,excel uygulamasını Dosya - Farklı Kaydet – Excel Makro Etkin Çalışma Kitabı şeklinde kaydediniz.


Kod:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   ActiveCell.Select
   Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlBetween, _
       Formula1:="=50", Formula2:="=100"
   Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
   With Selection.FormatConditions(1).Font
       .Color = vbBlack
       .TintAndShade = 0
   End With
   Selection.FormatConditions(1).StopIfTrue = False
   Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlNotBetween, _
       Formula1:="=50", Formula2:="=100"
   Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
   With Selection.FormatConditions(1).Font
       .Color = vbRed
       .TintAndShade = 0
   End With
   Selection.FormatConditions(1).StopIfTrue = False
End Sub

Bu kod ile,sayfa üzerindeki istediğiniz herhangi bir hücresine (aktif hücreye) gireceğiniz değere göre;talebiniz doğrultusunda hücre font renklendirmesi yapacaktır.bilgilerinize.

İyi çalışmalar,
saygılar.
İkinize de çok teşekkürler. Ben gereken cevaplarımı aldım. Sağ olun var olun.