Satır renklendirme

[rtk19641990]

Merhaba,
Forumda aradım ama bulamadım. Sütünda yer alan hücre dolu ise o hücreye ait satırın herhangi bir renkte olmasını nasıl sağlayabilirim?
Örnekte göstermeye çalıştım. 610 olan satırı renkli göstermek istiyorum.

Teşekkürler. İyi çalışmalar.

 

[İhsan Tank]

Merhaba,
Forumda aradım ama bulamadım. Sütünda yer alan hücre dolu ise o hücreye ait satırın herhangi bir renkte olmasını nasıl sağlayabilirim?
Örnekte göstermeye çalıştım. 610 olan satırı renkli göstermek istiyorum.

Teşekkürler. İyi çalışmalar.

merhaba
hangi alanı boyuyacaksanız tarayınız
biçim - koşullu biçimlendirme - formül bölümüne

=$F2<>""

biçim'i ayarlayın.

eki inceleyin
65536 satır'da boyama yapacaktır

 

[rtk19641990]

TRF TUTARI 610,00 olan satırı renklendireceğim. Ayrıca sütün devam ediyor. Arada boşluklar var sonra tekrar bir değer var. Ben sadece dolu alanlara ait satırları renklendirmek istiyorum. Yani örneğin 5 ci, 110.cu, 156 dolu bu satırları renkli olsun.

 

[Enemy]

Private Sub Worksheet_SelectionChange(ByVal target As Range)
Static eski
If eski = vbEmpty Then GoTo 11
If Val(Cells(eski, "F")) > 0 Then
Cells(eski, "F").EntireRow.Interior.ColorIndex = 5
Else
Cells(eski, "F").EntireRow.Interior.ColorIndex = xlNone
End If
11: eski = target.Row
End Sub

Yukarıdaki kodları Sheet1 sayfa sekmesine sağ tıklayın. Oradan kod görüntüle menü komutuna tıkladıktan sonra ekrana gelen boş pencereye yapıştırın. Kolay gelsin.

 

[rtk19641990]

Yani değer varsa o satır renkli değilse boş ise aynen kalacak

 

[rtk19641990]

Bu kodu modül kısmına mı yazacağım?

 

[Enemy]

hayır, sheet1 sayfasının modül kısmına yazmalısınız.

 

[rtk19641990]

Özür dilerim ama yazdıktan sonra çalıştıramadım
ne yapmam gerekiyor? Run deyince pencere açıldı ama isim verip macro olarak mı save edeceğim?

 

[rtk19641990]

O dolu satırlara tıklayınca renkli oluyor. otomatik olma şansı var mı acaba?

 

[İhsan Tank]

eki güncelledim inceleyin

 

[rtk19641990]

çok teşekkür ederim

 

[rtk19641990]

Bir ricam daha olsa? hepsini işaretledikten sonra tamamını seçebilir miyim? belki toplu olarak silme ihtimalim var da..

 

[rtk19641990]

Daha doğrusu hücreyi bulduktan sonra o satırı renklendirip, kaç tane varsa hepsini seçip bir defa da silebilmek istiyorum. gerçekten zahmet verdim. teşekkürler.

 

[rtk19641990]

Ve de son soru. Bu işlemleri makro ile yapmak mümkün mü?