استفاده از فیلتر در vba

[mehey]

توضیحات در فایل پیوست نوشته شده
filter.zip

اخطار: این یک موضوع قدیمی است به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

[mehey]

چطور میشه از فیلتر در vba استفاده کرد؟؟؟؟؟؟

[mehey]

کسی نیست جواب بده؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

[ali.b]

Sub AutoFilter_Begins_With()
 
Range("A1").AutoFilter Field:=1, Criteria1:="Enter Criteria Here*"
 
End Sub 

ای ی نمونه کد واسه فیلتر هست

[mehey]

Sub AutoFilter_Begins_With()
 
Range("A1").AutoFilter Field:=1, Criteria1:="Enter Criteria Here*"
 
End Sub 

ای ی نمونه کد واسه فیلتر هست

این کد مشکلش چیه؟
k = Application.WorksheetFunction.AdvancedFilter(Range ("list!d"), DateValue(Now))

[mehey]

k = Application.WorksheetFunction.AdvancedFilter(Range("list!d:d"), DateValue(Now))

[mehey]

کسی نمیتونه کمک کنه؟