Bu dosya, hücreye girilen sayıların ve bazı isimlerin değerine göre otomatik olarak renklendirilmesini sağlar. Renklendirme koşullu biçimlendirme kuralıyla değil, sayfa üzerindeki bir VBA makrosuyla yapılır; hücre değeri değiştiği anda dolgu rengi ve kalın yazı biçimi uygulanır.
Dosyanın içeriği
- Sayfa1: A1:N30 aralığında örnek veriler bulunur. 3. satırda isimler (Erkan, Gökhan, Bülent) ve 1, 7 gibi tek haneli sayılar, 4. ve 5. satırlarda 10 ile 36 arasındaki sayılar, 6. satırda 9, 15, 55, 70 ve 90 değerleri yer alır.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Makro, Sayfa1 sayfa modülündeki Worksheet_Change olayıdır; herhangi bir hücre değiştiğinde otomatik çalışır, ayrıca çalıştırılması gerekmez. Değişen hücre ile sayfadaki formüllü hücreler tek tek kontrol edilir ve değere göre şu biçimler uygulanır:- Hücre boşsa dolgu rengi ve kalın yazı kaldırılır.
- Erkan, Sinem, Gökhan isimleri: kırmızı dolgu (ColorIndex 3), kalın yazı.
- Bülent, Bahadır isimleri: yeşil dolgu (ColorIndex 4), kalın yazı.
- 1, 3, 7, 9 sayıları: mavi dolgu (ColorIndex 5), kalın yazı.
- 10 ile 25 arası sayılar: sarı dolgu (ColorIndex 6), kalın yazı.
- 26 ile 99 arası sayılar: pembe dolgu (ColorIndex 7), kalın yazı.
- Bunların dışındaki değerler (2, 4, 5, 6, 8 gibi) biçimsiz bırakılır.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Sayfa1 üzerinde herhangi bir hücreye sayı ya da listedeki isimlerden birini yazın.
- Hücre, değerin ait olduğu gruba göre otomatik renklenir; değeri silerseniz biçim de kalkar.
- Farklı aralık veya renk istenirse Visual Basic Editor'da Sayfa1 modülündeki Case satırları ve ColorIndex değerleri düzenlenir.