hücredeki sayı kadar hücrenin zemin rengi kırmızı olsu

[ferhatt]

a1 hücresine 5 yazdığım zaman a2.. a6 hücrelerinin zemin rengi kırmızıya dönüşsün. yardımcı olursanız sevinirim

 

[cyberwolf1980]

bunun ıcın oncelıkle bıe egerlı formul kurup sonrada formulu yazdıgın yere kosullu bıcımlendırme yapman gerekıyor

buraya ornek bı dosya eklersen sana daha fazla yardımcı olabılırım
ıyı aksamlar

 

[mehmett]

Sayın ferhatt

Aşağıdaki kodu dosyanızın kod sayfasına yapıştırın veya ekte gönderdiğim örnek dosyayı kullanın.

[vb:1:dafd7af86b]Sub Makro1()
Columns("A:A").Select
Selection.Interior.ColorIndex = xlNone
a = [a1].Value+1
Range("A2:A" & a).Select
With Selection.Interior
.ColorIndex = 3
End With
End Sub[/vb:1:dafd7af86b]

leventm not:tarafımdan kodda ve ekli dosyada gerekli düzeltmeler yapılmıştır.

 

[mehmett]

Düzeltme;

koddaki

a = [a1].Value

satırı

a = [a1].Value + 1

şeklinde olacak.

 

[Levent Menteşoğlu]

Bende koşullu biçimlendirme ile yapılmış bir örnek sunuyorum.