[Help] xin giúp sửa code ẩn dòng

[langtuchungtinh360]

mọi người giúp mình xem và sửa lại code trong file giùm với. khi chạy lần đầu thì nó chạy nhanh. chạy lại thì chậm như rùa ấy.
https://www.fshare.vn/file/B6ONXH9KUCSO
code ở 1.K95 chạy xong rồi nhấn qua Sheet Danh Sach Fix rồi nhấn qua Sheet 1.K95 lại. thì chạy chậm

 

[vu_tuan_manh_linh]

Tôi không hiểu tại sao bạn không dùng giải pháp filter, ngay cả filter bằng code, nhanh hơn rất nhiều dù có hàng nghìn dòng dữ liệu.

 

[Let'GâuGâu]

mọi người giúp mình xem và sửa lại code trong file giùm với. khi chạy lần đầu thì nó chạy nhanh. chạy lại thì chậm như rùa ấy.
https://www.fshare.vn/file/B6ONXH9KUCSO
code ở 1.K95 chạy xong rồi nhấn qua Sheet Danh Sach Fix rồi nhấn qua Sheet 1.K95 lại. thì chạy chậm

khi đã xài code, thì xài hết bằng code, nữa nay nữa kia rất khó xử lý

Sub AnDong()
Range("b12").Offset([l10] + 1).Resize(186 - [l10]).EntireRow.Hidden = True
End Sub