Macro không lọc được ngày tháng.

[emgaingayngo]

Sau khi record macro em được macro như sau :

Sub Macro2()
'
' Macro2 Macro
'
'
Selection.AutoFilter
ActiveSheet.Range("$A$1:$B$772").AutoFilter Field:=1, Criteria1:="4"
ActiveSheet.Range("$A$1:$B$772").AutoFilter Field:=2, Criteria1:= _
"=20/11/13", Operator:=xlAnd
End Sub

trong quá trình record thì cho kết quả đúng, sau đó chạy lại macro này thì không có kết quả. Xin hỏi tại sao lại như vậy và chỉ cách khắc phục. (Excel 2010 thì Ok, excel 2007 bị lõi).

 

[Let'GâuGâu]

Sau khi record macro em được macro như sau :


trong quá trình record thì cho kết quả đúng, sau đó chạy lại macro này thì không có kết quả. Xin hỏi tại sao lại như vậy và chỉ cách khắc phục. (Excel 2010 thì Ok, excel 2007 bị lõi).

bạn thử vậy xem

 ActiveSheet.Range("$A$1:$B$772").AutoFilter Field:=2, Criteria1:=DateSerial(2013, 11, 20), Operator:=xlAnd

tôi cũng hay gặp vấn dề fillter với định dạng date, khi làm cho 2003 chạy được thì 2007 trở lên có vấn đề. ngược lại khi làm ở các verson sau thì 2003 lại có vấn đề.......haiz........

 

[leonguyenz]

Sau khi record macro em được macro như sau :
trong quá trình record thì cho kết quả đúng, sau đó chạy lại macro này thì không có kết quả. Xin hỏi tại sao lại như vậy và chỉ cách khắc phục. (Excel 2010 thì Ok, excel 2007 bị lõi).

Có thể rút ngắn lại code:
[gpecode=vb]
Sub Macro2()
ActiveSheet.Range("$A$1:$B$772").AutoFilter 1, 4
ActiveSheet.Range("$A$1:$B$772").AutoFilter 2, DateSerial(2013, 11, 20)
End Sub
[/gpecode]