Cho mình hỏi đoạn code bên dưới bị sai ở đâu mà khi mình lọc vẫn không ra kết quả vậy ạ?
Sub LocDL()
Dim Tungay As Long
Dim Denngay As Long
Tungay = CLng(Range("G1").Value)
Denngay = CLng(Range("G2").Value)
ActiveSheet.Range("$A$1:$C$13").AutoFilter Field:=1, Criteria1:= _
">=" & Tungay, Operator:=xlAnd, Criteria2:="<=" & Dengay
End Sub
Chào bạn bạn thử lọc bằng AutoFilter không sử dụng macro xem kết quả có chính xác không nhé.
Không sử dụng marco thì vẫn lọc được bình thường ạ