Makro ile Koşullu Biçimlendirme

Bu dosya, E2 hücresine yazılan plakanın araç listesinde aranmasını ve eşleşen kayıtların VBA koduyla renklendirilmesini gösterir. Koşullu Biçimlendirme menüsü yerine makro kullanılır; bu nedenle dosya makro öğrenmek isteyenler için hazır bir örnek niteliğindedir.

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• Sheet1: A1:F30 aralığında araç listesi bulunur. A sütununda Araç Plaka, C sütununda Sahibi yer alır. E1 hücresinde Plaka Yazınız başlığı, E2 hücresinde aranacak plaka bulunur.
• Tanımlı adlar: plaka (A2:A30), kilometre (B2:B30), modeli (D2:D30) ve sahibi (C2:C30).

Dosyada formül kullanılmamıştır; tüm işlem makrolarla yapılır.

Makrolar​

• Worksheet_Change (Sheet1 sayfa kodu): sayfada bir hücre değiştiğinde kosullu_bicimlendirme makrosunu otomatik çalıştırır.
• kosullu_bicimlendirme: önce TEMIZLE makrosunu çağırır. Ardından E2 değerini boşluklardan arındırıp büyük harfe çevirir ve plaka adlı aralıktaki her hücreyle karşılaştırır. Eşleşen satırda plaka hücresi kırmızı (ColorIndex 3), iki sütun sağındaki hücre sarı (7), üç sütun sağındaki hücre mavi (5) renge boyanır.
• BOSLUKAL: verilen metindeki boşluk karakterlerini çıkaran işlevdir. Böylece "19 VZ 596" ile "19VZ596" aynı plaka sayılır.
• TEMIZLE: A2:D30 aralığındaki dolgu renklerini kaldırır ve imleci E2:F2 aralığına alır.
• Kodda dosya silme veya dış bağlantı gibi işlem yoktur.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. E2 hücresine aranacak plakayı yazın; büyük/küçük harf ve boşluk farkı sonucu etkilemez.
3. Enter tuşuna basın; sayfadaki değişiklik makroyu çalıştırır ve eşleşen satırlar renklenir.
4. Başka bir plaka yazıldığında önceki renkler temizlenir, yeni sonuç boyanır.
5. Kendi listeniz için A2:D30 aralığındaki verileri değiştirin; aralık genişletilecekse plaka adı ve TEMIZLE makrosundaki aralık güncellenir.