Onay kutusundan verileri filtreleme.

[Bora K]

Merhabalar.

Maviye Tick atıldığında 18% olan veriler gözükecek.
Kırmızıya tick atıldıında ise 25% olan veriler gözükecek
Kırmızı ve Mavi her ikiside boş olursa karışık halde gözükecek.
(Mavi yada Kırmızıda herhangi birinde tick varken diğerine tick atıldığında ilk atılan tick iptal olacak..)

Değerli uzmanlarımızın yardımlarını bekliyorum.

 

[Emir Hüseyin Çoban]

. . .

Filtre özelliğini kullanarak mı yapmak istiyorsunuz?

. . .

. . .

 

[Emir Hüseyin Çoban]

. . .

Ekte.

. . .

 

[Bora K]

Merhaba
Hüseyin Bey
Alakanız için teşekkür ederim evvela.

Dosya işlev olarak olmuş. Görsellik için bilhassa checkbox ile süzme
yapmak istemiştim.
Süzme butonları olmak zorundamı acaba?
Makro kodu ile bu işlemi yapamazmıyız. (K7:K) aralığında.
Yada sadece ilgili sütunda süzme butonu kalsa diğerleri silinse olurmu acaba?
kendim denedim lakin beceremedim.

 

[Bora K]

Kendi gayretim ile aşağıdaki kodları yazdım.
Yukarıda da değindiğim gibi bu dosyanın biraz
estetik olmasını istiyorum.

Şuanda dosyada 3 adet buton var.
Bu kodları sırası ile aynı butondan nasıl çalıştırabilirim.
her tık da bir kod çalışacak döngü devam edecek sürekli.
Yada aşağıdaki kodlar tek kod içinde toplanabilirmi?
Yardımcı olursanız sevinirim.

Sub Onsekizi_Süz()
Range("K7:K3333").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="18%"
Range("A1").Select
End Sub

Sub Yirmibeşi_Süz()
Range("K7:K3333").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="25%"
Range("A1").Select
End Sub

Sub Süz_İptal()
Range("K7:K3333").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1
Range("A1").Select
End Sub

 

[Emir Hüseyin Çoban]

. . .

Tek buton için

sub kod_tümü()
[COLOR="Navy"]call[/COLOR] birinci_kod_başlığı
[COLOR="Navy"]call[/COLOR] ikinci_kod_başlığı
[COLOR="Navy"]call[/COLOR] üçüncü_kod_başlığı
end sub

. . .

 

[Bora K]

EDİT : Her ne kadar hedefimize ulaşmış olsakta son aşama konunun adı ile bağdaşmamakta.
Dolayısı ile yeni başlık açtım.

http://www.excel.web.tr/f48/togglebutton-yardymy-ile-coklu-makro-caly-tyrma-t129999.html