Bu dosya, A sütununa girilen 1-5 arası sayıya göre ilgili satırın renginin otomatik değiştirilmesini gösteren bir VBA örneğidir. Biri yazı rengini, diğeri zemin rengini değiştiren iki sayfa içerir.
Dosyanın içeriği
- FONT RENGİ: A1 hücresinde 1 değeri, C, E, G, I ve K sütunlarında "DENEME" metinleri bulunur. A sütununa girilen sayıya göre satırdaki yazı rengi değişir.
- ZEMİN RENGİ: Aynı örnek düzen bu sayfada da yer alır. A sütununa girilen sayıya göre satırın zemin (dolgu) rengi değişir.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Dosyada zararlı bir işlem, dosya silme ya da dış bağlantı yoktur. Her iki sayfada da sayfa koduna yazılmış bir Worksheet_Change olayı bulunur; ayrıca çalıştırılması gerekmez, hücre değiştiğinde kendiliğinden devreye girer.- FONT RENGİ sayfası: A sütunundaki bir hücre değiştiğinde o satırın A:K aralığındaki yazı rengi ayarlanır. 1 için ColorIndex 6, 2 için 7, 3 için 8, 4 için 9, 5 için 10 uygulanır. A hücresi boşaltılırsa yazı rengi varsayılana (ColorIndex 0) döner.
- ZEMİN RENGİ sayfası: Aynı mantıkla A:K aralığının zemin rengi değiştirilir. Aynı ColorIndex değerleri kullanılır; hücre boşaltılırsa zemin rengi temizlenir.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Yazı rengini değiştirmek için FONT RENGİ, zemin rengini değiştirmek için ZEMİN RENGİ sayfasına geçin.
- Renklendirmek istediğiniz satırın A hücresine 1 ile 5 arasında bir sayı girin; A:K aralığı ilgili renge dönüşür.
- Rengi kaldırmak için A hücresindeki değeri silin.
- Kendi tablonuzda kullanmak için sayfa kodundaki Worksheet_Change olayını ve ColorIndex değerlerini kendi sayfanıza uyarlayın.
