Kết quả lọc dữ liệu từ sheet TONG HOP qua từng chi tiết (1 người xem)

[truc l]

Chào tất cả các Anh Chị
Em muốn lọc dữ liệu từ sheet TỔNG ra từng sheet con mà vẫn chưa được
Từ sheet TONG HOP khi nhấn nút LỌC thì tự nhảy ra tương ứng sheet các Tổ
Anh Chị có cách nào giúp em với ạ

 

[HUONGHCKT]

Chào tất cả các Anh Chị
Em muốn lọc dữ liệu từ sheet TỔNG ra từng sheet con mà vẫn chưa được
Từ sheet TONG HOP khi nhấn nút LỌC thì tự nhảy ra tương ứng sheet các Tổ
Anh Chị có cách nào giúp em với ạ

Trong khi chờ đợi hãy thử code trong file sau:

 

[Hoàng Tuấn 868]

Chào tất cả các Anh Chị
Em muốn lọc dữ liệu từ sheet TỔNG ra từng sheet con mà vẫn chưa được
Từ sheet TONG HOP khi nhấn nút LỌC thì tự nhảy ra tương ứng sheet các Tổ
Anh Chị có cách nào giúp em với ạ

..... ..... ..... ..... .....

 

[Hoàng Tuấn 868]

Trong khi chờ đợi hãy thử code trong file sau:

Em chạy thử code của anh thì kết quả như hình dưới, không biết có phải do máy em lỗi không.

 

[HUONGHCKT]

Em chạy thử code của anh thì kết quả như hình dưới, không biết có phải do máy em lỗi không.
View attachment 309712 View attachment 309713

Cảm ơn anh đã xem bài và chỉ ra cái sai. Tôi đã sai khi để dòng bỏ lọc ra ngòa vòng lặp.
Chỉ cần : Thay

..........
Next i
       .Range("B5:B6").AutoFilter
.........

Thành:

.........
 .Range("B5:B6").AutoFilter
Next i
.......

chạy mới cho ra kết quả đúng.
Sơ xuất không kiểm tra kỹ.
Tôi xin chân thành nhận lỗi nhé