Sadece istediğim kolonda filtre yapma makrosu

[uyelik.ben]

Sub Filtre()
'
' Filtre Macro
'
' Keyboard Shortcut: Ctrl+q
'
ActiveSheet.Range("$A$10:$SH$417").AutoFilter Field:=3, Criteria1:=RGB(226 _
, 239, 218), Operator:=xlFilterCellColor
End Sub

Merhaba, yukarıda belirttiğim makro ile sadece C kolonu yani Field 3'te istediğim koşullu biçimlendirme rengine göre filtreleme yapabiliyorum. Ben her kolon değiştirdiğimde bu makro sadece o kolon için çalışsın istiyorum. Yani field 4'e geldiğimde kısa yolu kullanırsam filtrelemeyi field 4 için yapsın. Ancak bu kod hangi hücrede olursam olayım sadece field 3 te filtreleme yapıyor. Yardımlarınızı rica ederim.

 

[Murat OSMA]

3 yerine ActiveCell.Column yazıp deneyin.

 

[uyelik.ben]

Siteden yazılanları inceleyerek çok faydalandım geçmiştr. İlk kez birşey sordum 2 gündür uğraştığım soruna 1 dakikada çözüm buldunuz. Teşekkürler. Şu dakikada altın üye oluyorum. Emeği geçen herkese teşekkürler.

 

[Murat OSMA]

Rica ederim. Faydalı olabildiysek ne mutlu. ????????