Lỗi Method 'sort' of object failed

[hadoan-pap]

Em chào mọi người.

Khi em record vba luc sorting để có được đoạn code như trong file đính kèm... đoạn code này chạy trên máy em không làm sao... Nhưng khi em mang file sang máy khác chạy thì nó báo lỗi như ảnh đính kèm ạ.

Em không biết đây là lỗi gì và làm thế nào để khắc phục ạ.

Rất mong mọi người giúp đỡ.

Em xin cảm ơn!

 

[hadoan-pap]

Dạ.

Đây là file em muốn Range ("E1:G100"), kết quả sẽ như vùng màu vàng ạ... nó sort giảm dần theo thứ tự của cột F ( số lượng ).

Đoạn này em record ra code, nhưng mang sang máy khác chạy thì lỗi.

Rất mong mọi người giúp em đoạn code VB thay thế cho việc sort này ạ.

E xin cảm ơn!

Bài đã được tự động gộp: 4/12/19

Dạ.

Em đã fix được đoạn code mà record được từ macro bang cách khai báo them 1 biến ws as ActiveSheet

Và sau đó gán biến này cho toàn bộ đoạn code ActiveWorkbooks.xxxxx như trong ảnh phía trên bài post ạ.