Filtreli sayfayı sayma

[kadir78]

İyi günler. Aşağıdaki kod ile dolu hücreleri saydırıyorum fakat filtre yaptığımda sadece filtre yapılan hücrelerin sayısını bulmasını nasıl sağlayabilirim. Saatlerdir uğraşıyorum çözemedim.

s1.range("D3") = worksheetfunction.countA(s2.range("f5:f5000"))

s1 ve s2 set edilen sayfalar.

 

[Korhan Ayhan]

Filtreli alanlar için ALTTOPLAM (SUBTOTAL) fonksiyonunu kullanabilirsiniz.

 

[kadir78]

Korhan hocam dediğiniz gibi "subtotal" ile kodları yazdım istediğim gibi oldu teşekkür ederim.

s1.range("D3") = worksheetfunction.subtotal(103, s2.range("f5:f5000"))