Koşullu hücre renklendirmesi

[msguven]

"Sayfa2" deki A1 hücresi yeşil ise "sayfa1" deki A1 hücresinin yeşil olmasını, kırmızı ise kırmızıya dönmesini istiyorum, koşulluyu beceremedim. Yardım lütfen.

 

[Kemal Demir]

sub renklendir()
Sheets("Sayfa2").Range("a1").Interior.Color = Sheets("Sayfa1").Range("a1").Interior.Color
End sub


Zannedersem Bu kod işinizi Görür

 

[msguven]

Kodu nereye yazacağım, Sayfa 1 de A1 hücresindeyken koşullu biçimlendirme içinemi? Evet ise yazdım ama olmadı.

 

[msguven]

Koşullu biçimlendirme başka sayfadan veri almıyormuş galiba. Peki şöyle bir formül yazabilecek varmı bana mümkünse;
Sayfa1 de A1 hücresindeyken;
Eğer sayfa2 deki A1 hücresi "yeşil" ise Sayfa1 deki A1 hücresini yeşil yap, kırmızı ise "kırmızı" yap.

 

[Levent Menteşoğlu]

istediğiniz koşullu biçimlendirme ile kolaylıkla yapılabilir. Yapmanız gereken sadece sayfa2 de A1 hücresini renklendiren kriteri aynı şekilde sayfa1 A1 hücresine yazmanızdır. sayfa1 A1 hücresinede =Sayfa2!A1 formülü yazılmalıdır.

 

[msguven]

çok güzel çok pratik bir çözüm, teşekkürler. Ancak benim ikinci sayfamda veri yok. Yani varda yok. ikinci sayfadaki hücre yeşil ise birinci sayfadakide (bununda içinde veri olmayacak) yeşil olması lazım.

 

[Levent Menteşoğlu]

Koşullu biçimlendirme başka sayfadan veri almıyormuş galiba

Eğer diğer sayfadaki hücreye bir ad tanımlayıp, bu adı kullanarak diğer sayfadaki veriye görede koşullu biçimlendirme yapabilirsiniz.

Bir örnek dosya eklerseniz sanırım kesin cevap bulmak kolay olacak.

 

[msguven]

İlişikte bir dosya gönderiyorum sanırım buna göre sorarsamdaha iyi olacak. ikinci sayfada koşullu biçimlendirme var. ikinci sayfada B3 hücresi yeşil ise birinci sayfada belittiğim I7 hücresinin yeşile dönmesini, eğer ikinci sayfadaki B3 hücresi kırmızı ise birinci sayfadaki I7 hücresininde kırmızıya dönmesini istiyorum. sanırım böylesi daha açıklayıcı olur.

 

[Levent Menteşoğlu]

Ã?ncelikle Sayfa2 B3 hücresine bir ad tanımlayın örneğin bu hücreye "a" ismini verin. Sonrada Sayfa1 I7 hücresindeki koşullu biçimlendirmeye aşağıdaki formülleri yazın.

Yeşil renk için; =SOLDAN(a;2)="Up"

Kırmızı renk için; =SOLDAN(a;4)="Down"

 

[msguven]

çok iyi süper, İYİKİ VARSIN EXCEL WEB TR, ve tabiki sn. mod leventm, teşekkürler.