Nhờ giúp chuyển từ sub lọc dữ liệu thành function

[ngocleasing]

Bác nào chuyển giúp cái thủ tục sau thành hàm đươc không ạ

Public Sub MyFilter()
Dim lngStart As Long, lngEnd As Long
lngStart = Range("E1").Value 'assume this is the start date
lngEnd = Range("E2").Value 'assume this is the end date
Range("C1:C13").AutoFilter field:=1, _
Criteria1:=">=" & lngStart, _
Operator:=xlAnd, _
Criteria2:="<=" & lngEnd
End Sub

https://vi.extendoffice.com/documents/excel/910-excel-filter-between-two-dates.html

 

[HeSanbi]

@ngocleasing
Bác có thể tham khảo bài viết mới của tôi để sử dụng hàm trả giá trị tại ô Viết hàm

Hàm FilterA và FilterV - Tận dụng bộ lọc AutoFilter và AdvancedFilter

HÀM UDF FilterA và FilterV bổ trợ tận dụng hai bộ lọc AutoFilter và AdvancedFilter Hôm nay tôi chia sẻ với các bạn hàm có thể gọi hai bộ lọc mà Application Excel hỗ trợ trong VBA hoặc phải cài đặt bằng tay trong Ribbon khá rối, thì nay đã có hàm bổ trợ này giúp các bạn thao tác gọn gàng và...

www.giaiphapexcel.com

 

[ngocleasing]

@ngocleasing
Bác có thể tham khảo bài viết mới của tôi để sử dụng hàm trả giá trị tại ô Viết hàm

Hàm FilterA và FilterV - Tận dụng bộ lọc AutoFilter và AdvancedFilter

HÀM UDF FilterA và FilterV bổ trợ tận dụng hai bộ lọc AutoFilter và AdvancedFilter Hôm nay tôi chia sẻ với các bạn hàm có thể gọi hai bộ lọc mà Application Excel hỗ trợ trong VBA hoặc phải cài đặt bằng tay trong Ribbon khá rối, thì nay đã có hàm bổ trợ này giúp các bạn thao tác gọn gàng và...

www.giaiphapexcel.com

Vâng, cảm ơn bác nhiều ạ