Code lọc AdvancedFilter Action.

[tvxdgt]

Mình dùng AdvancedFilter Action để lọc dữ liệu từ ngày đến ngày nhưng chưa đạt được kết quả mong mọi người chỉ giúp (trong dữ liệu năm 2020 thì khi lọc dữ liệu phải đặt đến năm 2021 mới lọc được)

 

[Hoàng Nhật Phương]

Mình dùng AdvancedFilter Action để lọc dữ liệu từ ngày đến ngày nhưng chưa đạt được kết quả mong mọi người chỉ giúp (trong dữ liệu năm 2020 thì khi lọc dữ liệu phải đặt đến năm 2021 mới lọc được)

Hic xin lỗi, OT xem tập tin Bạn gửi kèm thực sự không hiểu gì luôn, phiền Bạn có thể giải thích thêm được không?
Bạn muốn lọc dữ liệu từ ngày đến ngày? Vậy nguồn dữ liệu lấy từ đâu? điều kiện là vùng nào ? Và kết quả muốn đưa về đâu vậy?

 

[tvxdgt]

Hic xin lỗi, OT xem tập tin Bạn gửi kèm thực sự không hiểu gì luôn, phiền Bạn có thể giải thích thêm được không?
Bạn muốn lọc dữ liệu từ ngày đến ngày? Vậy nguồn dữ liệu lấy từ đâu? điều kiện là vùng nào ? Và kết quả muốn đưa về đâu vậy?

Sheet QUANLY có nút lệnh "BÁO CÁO BÁN HÀNG" click vào chọn ngày từ ngày để lọc dử liệu ở sheet D.XUAT và lọc dán qua sheet BCXUAT nhưng chưa đạt được kết quả mong mọi người chỉ giúp (trong dữ liệu năm 2020 thì khi lọc dữ liệu phải đặt đến năm 2021 mới lọc được)

- Nguồn lấy dử liệu: từ sheet D.XUAT,
- Vùng: trong code có vùng chọn đó bạn.
- Kết quả đưa về: Sheet BCXUAT.
Phần lọc dùng code trong AdvancedFilter Action.

 

[Hoàng Nhật Phương]

Sheet QUANLY có nút lệnh "BÁO CÁO BÁN HÀNG" click vào chọn ngày từ ngày để lọc dử liệu ở sheet D.XUAT và lọc dán qua sheet BCXUAT nhưng chưa đạt được kết quả mong mọi người chỉ giúp (trong dữ liệu năm 2020 thì khi lọc dữ liệu phải đặt đến năm 2021 mới lọc được)

Hình như là do Bạn truyền ngày tháng qua userForm xuống Sheet nên không còn định dạng là ngày/tháng/năm nữa mà thay vào đó là định dạng text nên mới vậy.

Trong Sheet "D.XUAT" Bạn thử sửa lại công thức N2 & O2 xem được không ạ?
N2: =">="&DATE(RIGHT(L2,4),MID(L2,4,2),LEFT(L2,2))
O2: ="<="&DATE(RIGHT(M2,4),MID(M2,4,2),LEFT(M2,2))

 

[tvxdgt]

Hình như là do Bạn truyền ngày tháng qua userForm xuống Sheet nên không còn định dạng là ngày/tháng/năm nữa mà thay vào đó là định dạng text nên mới vậy.

Chắc là vậy rồi, vì file này thực chất là dùng định dạng ngày tháng DTPicker nhưng khi chuyển qua office 365 thì bị lỗi phải đăng ký window/system 32 này nọ nên bỏ đưa vào text box nhưng text box có định dạng lại ngày mới truyền xuống excel mà.
Và đã kiểm tra dử liệu truyền xuống ecxel vẫn đúng là ngày tháng

 

[Hoàng Nhật Phương]

Chắc là vậy rồi, vì file này thực chất là dùng định dạng ngày tháng DTPicker nhưng khi chuyển qua office 365 thì bị lỗi phải đăng ký window/system 32 này nọ nên bỏ đưa vào text box nhưng text box có định dạng lại ngày mới truyền xuống excel mà

Bạn thử sửa lại công thức theo bài 4 xem được không ạ, OT vừa bổ sung thêm phần công thức.

 

[tvxdgt]

Hình như là do Bạn truyền ngày tháng qua userForm xuống Sheet nên không còn định dạng là ngày/tháng/năm nữa mà thay vào đó là định dạng text nên mới vậy.

Trong Sheet "D.XUAT" Bạn thử sửa lại công thức N2 & O2 xem được không ạ?
N2: =">="&DATE(RIGHT(L2,4),MID(L2,4,2),LEFT(L2,2))
O2: ="<="&DATE(RIGHT(M2,4),MID(M2,4,2),LEFT(M2,2))

Chuẩn đó bạn, phải định dạng lại ngày tháng ở trong Sheet mới lọc được.
Cảm ơn bạn nhiều nhé, đã fix lỗi ok