Bu dosya, çalışma kitabında seçilen hücreyi arka plan rengini sarıya çevirerek vurgulayan bir VBA örneğidir. Başka bir hücreye geçildiğinde önceki hücrenin rengi kaldırılır; böylece yalnızca aktif hücre renkli görünür. Geniş tablolarda imlecin konumunu takip etmek için kullanılabilir.
Dosyanın içeriği
- Sayfa1: E12:S20 aralığını kapsayan tek sayfadır. 20. satırda "VBA Seçilen Hücrenin Renklendirme" başlığı yer alır. Sayfada formül, tablo, grafik veya veri doğrulama bulunmaz.
- ThisWorkbook: Renklendirme işlemini yapan iki olay makrosunu barındırır.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Makrolar düğmeyle çalıştırılmaz; olay makrosu oldukları için otomatik devreye girer.- Workbook_Open: Dosya açıldığında çalışır ve tüm hücrelerin dolgu rengini temizler (Cells.Interior.ColorIndex = xlNone).
- Workbook_SheetSelectionChange: Çalışma kitabındaki herhangi bir sayfada seçim değiştiğinde çalışır. Yeni seçilen alan sarıya boyanır (renk indeksi 6), bir önceki seçilen alanın rengi kaldırılır ve yeni alan sonraki geçiş için saklanır. Önceki alan Static değişkende tutulur; hata olursa On Error Resume Next ile işlem kesilmeden devam eder.
Nasıl kullanılır
- Dosyayı açın ve makroların etkinleştirilmesine izin verin.
- Sayfa1 üzerinde herhangi bir hücreyi ya da hücre aralığını seçin; seçim sarıya boyanır.
- Başka bir hücreye geçtiğinizde önceki seçimin rengi kalkar, yeni seçim boyanır.
- Kodu kendi dosyanızda kullanmak için VBA düzenleyicisinde ThisWorkbook modülündeki iki prosedürü kopyalayın ve dosyayı .xlsm biçiminde kaydedin.