özel süzme

[wave41]

excellde bugünden küçük tarihleri makro ile özel süzme yapmak istiyorum, biraz uğraştım ama özel süzme alanında bugünki tarihi otomatik yazdıramadım. yardımcı olursanız sevinirim

 

[Merhum İdris SERDAR]

.

Aşağıdaki kodu deneyin.

Sub Bugunsuz()
   
   Selection.AutoFilter Field:=1, Criteria1:="<=" & CLng(Date)
   
End Sub

.

 

[wave41]

teşekkürler çok işime yaradı

 

[wave41]

peki hocam 10 günden 20 ve 30 günden eskileri süzdürebilirmiyiz, ayrı ayrı makrolarla

 

[Merhum İdris SERDAR]

.
Kodun:

...CLng(Date)-10

veya;

...CLng(Date)-30


vs...

bölümünü değiştiriseniz olur.

.