satır renklendirme

[manisali_mdr]

Arkadaşlar merhaba.."yeni bir satır renklendirme sorusu" başlıklı konum eskidiğinden dolayı sanırım yanıt veren olmuyor.ben de belki dikkat çeker diye konumu yeniledim..
ekteki satır renklendirme ile ilgili sorumu inceler ve yanıt verirseniz çok sevinirim

 

[N.Ziya Hiçdurmaz]

yanıt

Hücre biçimleri tarih olarak değiştirilmiştir.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Intersect(Target, [a4:a25]) Is Nothing Then Exit Sub
        If Month(Target) = 1 Then Range(Cells(Target.Row, "a"), Cells(Target.Row, "h")).Interior.ColorIndex = 6
        If Month(Target) = 2 Then Range(Cells(Target.Row, "a"), Cells(Target.Row, "h")).Interior.ColorIndex = 33
        If Month(Target) = 3 Then Range(Cells(Target.Row, "a"), Cells(Target.Row, "h")).Interior.ColorIndex = 6
        If Month(Target) = 4 Then Range(Cells(Target.Row, "a"), Cells(Target.Row, "h")).Interior.ColorIndex = 33
End Sub

 

[titris]

İşine Yaraması Ümidiyle

Arkadaşım benim çok fazla fonksiyon ve vba bilgim yok lakin sana formüllerle yardımcı olabilirim örnektede gönderiyorum.


İşini görmesini dilerim.

 

[manisali_mdr]

işte bu kadar arkadaşlar..ikisi de harika olmuş..ilginize,emeğinize,yüreğinize sağlık..çok teşekkür ediyorum

 

[uzmanamele]

merhaba
çalışma alanınızı mavi renk yapın, A4 hücre koşullu biçimlendirme formülü olarak yazıp dolgu rengini sarı yapın ve A4:H25 alanına biçimleri kopyalayarak deneyiniz.

=MOD($A4;2)=0