satır renklendirme

[manisali_mdr]

arkadaşlar merhaba
mesela "E" sütünuna tarih girildiğinde satırı istediğim renge boyasın istiyorum.
satırı renklendirmeyi biliyorum fakat satıra sabit bir şey girildiğinde renklendirebiliyorum
sütuna herhangi bir şey girdiğimde satırın renklendirmesini sağlayan makroyu bilmiyorum
şimdiden teşekkürler
ekteki örneği inceleyibilrisiniz.

 

[Merhum İdris SERDAR]

Aşağıdaki şekilde deneyin.

Private Sub Worksheet_Change(ByVal Target As Range)

On Error Resume Next
If Intersect(Target, [E:E]) Is Nothing Then Exit Sub
Sat = "A" & Target.Row & ":E" & Target.Row
Select Case Target
Case "": Range(Sat).Interior.ColorIndex = 0
Case Is [COLOR="Red"]> 0:[/COLOR] Range(Sat).Interior.ColorIndex = 36

End Select

End Sub

Case Is > 0: bölümünü
Case Is <> "": şeklinde de yapabilirsiniz.

 

[manisali_mdr]

arkadaşlar..az önceki "satır renklendirme" başlıklı sorumu acele olarak yazdığımdan türkçeyi biraz katletmişim..sizlerden özür diliyorum..(bir öğretmene yakışmamış değil mi?)

 

[manisali_mdr]

üstat teşekkürler..