Excel MouseOver Özelliğini Kullanarak Koşullu Biçimlendirme

Merhaba arkadaşlar, bu yazımda excel dosyalarımıza güzel bir görsellik katarak satırların incelenmesi sırasında kolaylık oluşturacağız.

Yukarıdaki resimde gösterilen projeyi yapacağız yani farenin ok işareti üzerine geldiği anda seçili satırın renklendirilme işlemi.

Öncelikle bunun için gerekli olan vba kodunu aşağıda oluşturalım.

Public Function mouserover(deger As Range)
Sheets("Sayfa1").Cells(1, 2) = deger
End Function

Tablo tasarımı aşağıdaki gibi olacaktır. B1 hücresine hiçbir değer yazmayacaksınız oraya C sütununda üstünde bulunulan hücrenin değeri değeri gönderilecek. B2’den itibaren ise kendi verdiğimiz sayıları yazıyoruz içerdikleri anlamlar çok da önemli değil.

C sütununda bulunan hücrelere ise aşağıdaki kodu yazalım.

=EĞERHATA(KÖPRÜ(mouserover(B2));8)

Normalde 8 değerinin gözükmesi gerekiyor ancak c sütunundaki hücrelerin yazı biçimlerini “Webdings” yaparsak ok işareti gözükecektir.

Bu işlem sayesinde hangi ok işaretinin üzerine gidersek B1 hücresine seçili ok işaretinin solunda bulunan sayısal değeri gönderiyoruz. Şimdi ise B1 hücresine göre koşullu biçimlendirme yapmamız gerekiyor.

B hücresindeki değer B1 hücresindeki değere eşit olan alanları renklendirdik.

İyi çalışmalar.