ExcelVBA.Net sitesine katkıda bulunabilirsiniz

[hakan26]

Arkadaşlar merhaba. 3 adet option buttonum var bunlandan hangisini seçersem sutun başlığımda ki fitrelemeyi buna göre yaptırmam gerekli veya bu option buttonlara göre sayfadaki verileri göstermem lazım teşekkürler

[Ali ÖZ]

Örnek dosya ekleyebilirmisiniz.

[hakan26]

dosya ektedir

[Ali ÖZ]

Ek nerededir ?

[hakan26]

kusura bakmayın tekrar ekliyorum

[hakan26]

Arkadaşlar yokmu yardımcı olabilicek biri

[Ali ÖZ]

Olmaz mı ? Buyurun.

Kod: Tümünü seç

Private Sub OptionButton3_Click()
If OptionButton3.Value = True Then
    Selection.AutoFilter Field:=4, Criteria1:="K"
Else
    Selection.AutoFilter Field:=4
End If
End Sub

Kod: Tümünü seç

Private Sub OptionButton2_Click()
If OptionButton2.Value = True Then
    Selection.AutoFilter Field:=4, Criteria1:="E"
Else
    Selection.AutoFilter Field:=4
End If
End Sub


Kod: Tümünü seç

Private Sub OptionButton1_Click()
If OptionButton1.Value = True Then Selection.AutoFilter Field:=4
End Sub

[hakan26]

Çok teşekkür ederim

[Ali ÖZ]

Rica ederim.