Hücredeki karakterinin rengine göre filtreleme

[Taner]

Hücredeki yazı karakterinin rengine ya da hücrenin arka alanına göre filtrleme yapan hazır bir makronuz var mıdır :?:

 

[Hüseyin]

Merhaba,
Visual Basic Editoru aç (Alt+F11)

Aşağıdaki kodu kopyala ve sayfaya yapıştır.

Function renkkodu(hucre As Range)
hucre1 = hucre.Address(ColumnAbsolute:=False, RowAbsolute:=False)
renkkodu = Range(hucre1).Font.ColorIndex
End Function

Kaydet ve Editörü kapat.
Renkkodu adında yeni bir fonksiyon yaratmış olduk.

Toblonun en sağındaki hücrelere
=renkkodu(adres) yaz (adres rengine göre filtreleme yapacağın hücre)
Aynı formülü tablonun tüm satırlarına karşılık gelecek şekilde kopyala.
Böylece sözkonusu hücrenin renk kodunu yazdırmış olduk.
Þimdi bu kolon üzerinden istediğin renk koduna göre filtre yapabilirsin.

Biraz özgün bir çözüm oldu, umarım işine yarar.
Başka kullanıcılardan farklı öneriler de gelebilir sanırım.

 

[pekanlar]

Renge Göre Suzme

Merhaba,

Excel 2007 versiyonunda renge göre süzme özelligini excele eklemisler.

Saygilarimla,
M.P.

 

[hsayar]

hucre1 = hucre.Address(ColumnAbsolute:=False, RowAbsolute:=False)

hocam buradaki Absolute deyimi ne işe yarar False yerine kullanılcak deyim nedir?