Bu dosya, bir hücrenin arka plan rengine göre başka bir hücrede sonuç üretmeyi gösterir. Excel'in yerleşik formülleri hücre rengini okuyamaz; bu nedenle işlem VBA ile yazılmış bir kullanıcı tanımlı fonksiyonla yapılır.
Fonksiyon üç durumu ayırır: dolgu rengi kırmızıysa "Kırmızı", hücrede dolgu yoksa "Seçtiğiniz Hücrede Renk Yok", başka bir renk varsa "Hücre rengi Kırmızı değil" sonucunu verir.
Dosyanın içeriği
- Sayfa1: B2 hücresinde "Renkli Hücre", C2 hücresinde "Formül Sonucu" başlığı bulunur. Renginin kontrol edileceği hücre B sütununa, sonuç ise yanındaki C sütununa gelir. Örnek formül C3 hücresindedir.
Kullanılan formüller
C3 hücresinde, B3 hücresinin dolgu rengini değerlendiren fonksiyon çağrılır:=RengeGoreFormul(B3)
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Makrolar etkinleştirilmezse C3 hücresi hata gösterir.- RengeGoreFormul (Module1): Parametre olarak aldığı hücrenin Interior.ColorIndex değerini kontrol eder. Değer 3 (kırmızı) ise "Kırmızı" yazar; dolgu deseni yoksa "Seçtiğiniz Hücrede Renk Yok" yazar; diğer renklerde "Hücre rengi Kırmızı değil" yazar. Fonksiyon hücre içinden formül olarak çağrılır, ayrıca çalıştırma gerekmez. Kod yalnızca hücre rengini okur; dosya silme ya da dış bağlantı içermez.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- B sütunundaki bir hücreyi kırmızı, başka bir renk ya da dolgusuz olarak biçimlendirin.
- Yanındaki sütuna C3 örneğindeki formülü, ilgili hücre adresini yazarak girin.
- Dolgu rengini değiştirdikten sonra sonucu güncellemek için F9 tuşuna basın veya formülü yeniden hesaplatın; renk değişikliği Excel'de otomatik hesaplamayı tetiklemez.