autofilter vba yardım

[koboy]

Merhabalar tek filtreme yapabiliyorum ançak 2 koşula göre nasıl filtreleme yapabilirim

Örnek ekledim

 

[ÖmerFaruk]

Dosyanıza bakmadım. Başlığı ve sorunuzu okudum.
Arama menüsünde bolca örnek bulabilirsiniz.

https://www.excel.web.tr/search/246251/?q=filtre++birden+fazla&o=date

 

[koboy]

Merhaba hepsini inceledim ançak işime yarayan yok

Dosyanıza bakmadım. Başlığı ve sorunuzu okudum.
Arama menüsünde bolca örnek bulabilirsiniz.

https://www.excel.web.tr/search/246251/?q=filtre++birden+fazla&o=date

 

[Merhum İdris SERDAR]

.

Sorunuzdan bir şey anladığım söylenemez. Ama bir şeyler yaptım.

Eke bakınız.

.

 

[koboy]

Merhabalar istediğim bu değil

Giris sayfasında sarı renklere çift tıkladım veri sayfsında filtre uygulamasını istiyorum

mart ayındaki tutar kısman çift tıklayın veri sayfasına gidecek aya göre filtre yapıyor benim istedim ay göre ve başlığa göre filtre yapma

bu koda uyarlamak istiyorum

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

Dim sh As Worksheet
If Intersect(Target, Range("A7:G" & Cells(Rows.Count, "A").End(xlUp).Row)) Is Nothing Then Exit Sub
If Target.Value = "" Then Exit Sub
Set sh = Sheets("veri")
sh.Range("A7").AutoFilter

sh.Range("A7").AutoFilter Field:=4, Criteria1:=Cells(Target.Row, "A").Value
sh.Select

End Sub

.Sorunuzdan bir şey anladığım söylenemez. Ama bir şeyler yaptım.

Eke bakınız.

.