Koşullu biçimlendirme veya formül....

[policeman]

Ekteki dosyamdaki sorum için Koşullu Biçimlendirme veya Formül ile çözüm bulunabilirmi?...
Kolay gelsin..
Saygılarımla....

 

[hamitcan]

2002 versiyonu kullandığınız için koşullu biçimlendirmede en fazla üç koşul verebilirsiniz. Bu yüzden bir kod yardımıyla çözdüm.

Sub renklendir()
    With WorksheetFunction
    For i = 4 To 7
        b = .Match(Sayfa1.Cells(i, 2), Sayfa2.Columns(2), 0)
        s = .Match(Sayfa1.Cells(i, 3), Sayfa2.Columns(2), 0)
        Sayfa2.Range("c" & b & ":" & "h" & s).Interior.ColorIndex = IIf(i Mod 2 = 0, 40, 36)
    Next
    End With
End Sub

 

[policeman]

İlginize teşekkürler ama makro konusunda yeterli bilgim olmadığı için sıcak bakmıyorum..
Ayrıca koşullu biçimlendirmede koşul iki renk..
Koşullu biçimlendirme ile olmuyorsa formül ile X ve Q harflerini getirmek....
İnşallah olmazları konuşmuyorumdur...
Saygılarımla...

 

[policeman]

Bir kere daha değerlendirmeye alabilirmiyiz?

 

[Ömer]

Merhaba,

Formül için,

A2 hücresine yazarak alt satırlara kopyalayınız.

=EĞER(MOD(ARA(B2;Sayfa1!$B$4:$B$7;SATIR(Sayfa1!$B$4:$B$7));2)=0;"X";"Q")

Tarih aralığı dışında bir veri olursa ne olması gerektiğini açıklamadığınız için o kısımla ilgili bir mantık kurmadım.

Yukardaki formül ile koşullu biçimlendirme ile renklendirme yapabilirsiniz..

.

 

[policeman]

Teşekkürler Sn. Uzman'ım,bu bir bayram hediyesi oldu;çok teşekkürler...
Saygılarımla...

 

[Ömer]

Rica ederim, iyi bayramlar..