• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Soru Koşullu Biçimlendirme

ragnorak

Altın Üye
Katılım
4 Haziran 2016
Mesajlar
208
Excel Vers. ve Dili
Excel 2021
Koşullu biçimlendirme ile Aktif Hücrenin bulunduğu satırı renklendirmek mümkün müdür?
 
Bildiğim kadarıyla sadece koşullu biçimlendirmeyle olmuyor çünkü koşullu biçimlendirme hücre içeriklerine göre işlem yapıyor, seçili hücreyi anlayabileceği bir özelliği yok.

İstediğiniz uygulama genellikle makro kullanılarak yapılıyor ama dosyanızdaki veri yapınıza ve bilgisayarınızın durumuna göre işlemlerde yavaşlamaya sebep olabiliyor.

Örnek:

 
Makroyla yeni oluşturduğum bir çalışma kitabındaki sayfada aktif hücre renkli olsun istiyorum. Makroyla başka dosyaya makro yazmak mümkün olmadığından koşullu biçimlendirme ile yapmayı düşündüm. Kodu sayfaya makro ile yazdırırsam sorunum çözülürdü.
 
İdris Hocam tam olarak istediğim buydu. Teşekkür ederim.
 
Kod:
With ActiveSheet.Range("A1" & ":Q50")
     .FormatConditions.Delete
     .FormatConditions.Add Type:=xlExpression, Formula1:="=YADA(HÜCRE(""col"")=HÜCRE(""col"";A1);HÜCRE(""row"")=HÜCRE(""row"";A1))"
     .FormatConditions(1).Interior.ColorIndex = 8
End With

bu şekilde butona kod olarak attığımda, sayfada hücreye tıklayıp çıkınca işlem görüyor. Nedeni ne olabilir.
 
Mümkündür. Koşullu biçimlendirme menüsünde elle formül girilirse tüm satır renklenir.

Örneğin kendi tablomdaki renklendirme ve formül. D sütununda DIVISIBLE olanları boyuyor. Kendinize uyarlayabilirsiniz.
8vhq6z0.png


380v5cf.png
 
Mümkündür. Koşullu biçimlendirme menüsünde elle formül girilirse tüm satır renklenir.

Örneğin kendi tablomdaki renklendirme ve formül. D sütununda DIVISIBLE olanları boyuyor. Kendinize uyarlayabilirsiniz.

Yalnız soru belirli veri içeren hücreye göre renklendirme değil, seçili olan hücre/satır/sütunun renklenmesi.
 
Kod:
With ActiveSheet.Range("A1" & ":Q50")
     .FormatConditions.Delete
     .FormatConditions.Add Type:=xlExpression, Formula1:="=YADA(HÜCRE(""col"")=HÜCRE(""col"";A1);HÜCRE(""row"")=HÜCRE(""row"";A1))"
     .FormatConditions(1).Interior.ColorIndex = 8
End With

bu şekilde butona kod olarak attığımda, sayfada hücreye tıklayıp çıkınca işlem görüyor. Nedeni ne olabilir.
Sayın @İdris SERDARın gösterdiği yöntemde gördüğüm kadarıyla seçime bağlı olarak koşullu biçimlendirmenin çalışabilmesi için yine hücrede seçime bağlı olarak çalışan bir makro olması gerekiyor.
 
Kod:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Target.Calculate
    End Sub
Bende sonradan fark ettim.
 
Geri
Üst