Hücredeki karakterinin rengine göre filtreleme [Archive] - Excel Forum

PDA

Tüm Versiyonu Göster : Hücredeki karakterinin rengine göre filtreleme


Taner
03-06-2004, 14:42
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
03-06-2004, 15:58
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
13-12-2007, 17:31
Merhaba,

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

Saygilarimla,
M.P.

hsayar
14-12-2007, 08:08
hucre1 = hucre.Address(ColumnAbsolute:=False, RowAbsolute:=False)

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


Özel Arama