File chạy quá chậm, chiếm nhiều ram

Liên hệ QC
Bạn Copy code sau vào 1 module và cho chạy code xem kết quả như thế nào
Mã:
Sub DelStyle()
    On Error Resume Next
    Dim St As Style
    For Each St In ThisWorkbook.Styles
        St.Delete
    Next
End Sub
 
Bạn Copy code sau vào 1 module và cho chạy code xem kết quả như thế nào
Mã:
Sub DelStyle()
    On Error Resume Next
    Dim St As Style
    For Each St In ThisWorkbook.Styles
        St.Delete
    Next
End Sub

Hi anh, em đã thử như anh nói nhưng tình trạng là sheet Danh Sach khi nhập liệu vào bấm enter thì nó phải chờ xử lý nữa anh ạ. Em không hiểu nguyên nhân thế nào luôn.
 
Hi anh, em đã thử như anh nói nhưng tình trạng là sheet Danh Sach khi nhập liệu vào bấm enter thì nó phải chờ xử lý nữa anh ạ. Em không hiểu nguyên nhân thế nào luôn.
Xem kỹ lại file của bạn thì thấy tại Sheet bảng lương của bạn có tới hơn 1000 dòng dùng công thức tham chiếu dò tìm tới sheet Danh sách. Do đó tốc độ xử lý bị trễ là đúng rồi. Bạn xem nếu cái nào đã chốt thì Paste Value đừng để công thức nữa thì tốc độ sẽ được cải thiện.
 
hi, diễn đàn giờ nhiều nhân tài quá

@nhathoang91 : muốn tạ ơn thì mời bác @dhn46 đi bia hơi, đấm lưng, mát xa mát gần --=0
 
Chào cả nhà và bạn dhn46!
Mình có 1 file excel, tình trạng tạo thêm cột hoặc copy dán nhiều dòng đều bị rất chậm đôi khi bị treo.
Rất mong các bác chỉ giáo và support giùm mình.
 

File đính kèm

Chào cả nhà và bạn dhn46!
Mình có 1 file excel, tình trạng tạo thêm cột hoặc copy dán nhiều dòng đều bị rất chậm đôi khi bị treo.
Rất mong các bác chỉ giáo và support giùm mình.
Nguyên nhân của bạn như sau:

1/ Sử dụng Conditional format tùy tiện. Bạn hãy xóa hết conditional format rồi định dạng lại CHỈ trong vùng bạn sử dụng, tuyệt đối không dùng CF cho toàn bộ cột hoặc toàn bộ dòng.

2/ Bạn có rất nhiều sheet ẩn, sheet nào cùng CF tùy tiện. Bạn xóa bớt sheet không cần thiết đi.
 
Web KT

Bài viết mới nhất

Back
Top Bottom