Konu çözüldü olarak işaretlenebilir.
Sorunu şu şekilde çözdüm:
1-) Makro kaydet diyip yeni bir makro oluşturuyoruz.
2-) Kayıt sırasında uygulayacağımız filtreyi rastgele bir tam sayı değeri için uyguluyoruz.
3-) Makro kaydını durduruyoruz.
4-) Makroları görüntüle dedikten sonra son kaydettiğimiz makroyu düzenliyoruz.
5-)
ActiveSheet.Range("$D$3:$D$16").AutoFilter Field:=1, Criteria1:="<=9", _
Operator:=xlOr
Olan kısmı,
ActiveSheet.Range("$D$3:$D$16").AutoFilter Field:=1, Criteria1:="<=" & ActiveSheet.Range("A2").Value, _
Operator:=xlOr
Olarak düzenliyoruz. Dilerseniz burada farklı bir excel sayfasından da hücre verisi alabilirsiniz. Bu örnek küçük eşittir örneği için ve D3 : D16 aralığındaki değerlerin A2 hücresine göre olan filtrelenmesini kapsıyor.
6-) Artık her makroyu çalıştırdığınızda A2 hücresindeki değerden küçük veya eşit olan değerler sütunumuzda filtrelenmiş olacak.
Umarım buraya bakan başka birinin işini görür.