Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Belli aralık dışında sayı yazınca renkli yazması durumu

youngeagle_3
youngeagle_3
Excel Cevaplanmış Soruları
3
2166

Belli aralık dışında sayı yazınca renkli yazması durumu

Çözüldü #1
youngeagle_3
Üye
youngeagle_3
Bul
Üye
Adı Soyadı: Ca.... Bu....
Konum:
Ofis Versiyonu: Ofis 2010
Son Oturumu: 10/12/2014,15:15
Yorumları: 2
Konuları: 1
Kayıt Tarihi: 03/12/2014
Teşekkür Puanı: 0
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.
Cevapla
#2
Coskun0559
Onursal Üye
Coskun0559
Bul
Onursal Üye
Adı Soyadı: Co.... ÇA....
Yaşı: 40
Konum: Tekirdağ
Ofis Versiyonu: -
Son Oturumu: 13/11/2024,03:19
Yorumları: 1.221
Konuları: 99
Kayıt Tarihi: 02/11/2008
Teşekkür Puanı: 519
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
GERİ SAYIM;Sen doğduğunda başladı ! Eğer (9) canlı bile olsaydın en fazla (8) kez kaçabilirdin Ölümden ! Bil ki (7) Düvele sultan dahi olsan yerin (6) Mekan olacak sana. En fazla (5) Metre kumaş götürebileceksin ! Kapatacaksın (4) açsanda gözlerini ! Bu (3) günlük fani dünyada Azraile (2) kat olup yalvarsanda nafile EceL geldiğinde (1) gün öleceksin ! İşte, o an herşey (0) dan başlayacak. Çünkü,
ÖLÜM BİR YOK OLUŞ DEĞİL,YENİDEN DOĞUŞTUR !
Cevapla
#3
atoz112
Onursal Üye
atoz112
Bul
Onursal Üye
Adı Soyadı:
Yaşı: 55
Konum: İstanbul
Ofis Versiyonu: Ofis 2007
Son Oturumu: 09/12/2017,11:02
Yorumları: 5.716
Konuları: 9
Kayıt Tarihi: 04/08/2009
Teşekkür Puanı: 1.172
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.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#4
youngeagle_3
Üye
youngeagle_3
Bul
Üye
Adı Soyadı: Ca.... Bu....
Konum:
Ofis Versiyonu: Ofis 2010
Son Oturumu: 10/12/2014,15:15
Yorumları: 2
Konuları: 1
Kayıt Tarihi: 03/12/2014
Teşekkür Puanı: 0
İkinize de çok teşekkürler. Ben gereken cevaplarımı aldım. Sağ olun var olun.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task