Buton Tıklandığında Özel Filtre Menüsü Çağrılabilinir mi ?

[yenilik025]

Merhabalar.

Buton Tıklandığında
Özel Filtre Menüsü Çağrılabilinir mi ?

 

[askm]

Makro kaydetle bile ilgili menü açılmıyor. Ancak userform tasarlayarak ilgili menu oluşturulabilir. Butona basınca userform gelir. Userformda tamam butonuna basınca filtreleme yapar.

 

[yenilik025]

Halbuki Excel'in Bir Özelliği Neticesinde Ancak olmuyor

Halbuki Excel'in Bir Özlelliği Neticesinde ancak olmuyor ?

Bir de Kısayol tuşu atasak olmuyor mu bunu nasıl yapabilriz.

ALT+ U+ T Ne bileyim ?

ALT+ U+ Ö

gibi.

Makro kaydetle bile ilgili menü açılmıyor. Ancak userform tasarlayarak ilgili menu oluşturulabilir. Butona basınca userform gelir. Userformda tamam butonuna basınca filtreleme yapar.

 

[Korhan Ayhan]

Merhaba,

2016 versiyonda aşağıdaki kod ile sonuç alıyorum. Sizde deneyiniz.

Kod;

B2 hücresini seçer ve bu hücreye göre özel filtre menüsünü açar. DENEME yazarak filtre uygular.

Kodu dilediğiniz gibi kendinize göre düzenlersiniz.

Private Sub CommandButton1_Click()
    If Not ActiveSheet.AutoFilterMode Then
        Range("A2:I" & Rows.Count).AutoFilter
    End If
    Range("B2").Select
    Application.SendKeys "%{DOWN}fö"
    Application.SendKeys "DENEME"
    Application.SendKeys "{TAB 4}~"
End Sub