Xin giúp đỡ code thay đổi dữ liệu nguồn cho Pivottables

[LYSM]

Em chào các anh chị!
Em có 1 bảng dữ liệu có dùng Pivottables nhưng bảng dữ liệu này được thêm dữ liệu vào liên tục, để thay đổi vùng dữ liệu nguồn cho Pivottables thông thường vào PivotTables tools/Change Data Source nhưng bây giờ em muốn dùng code thay cho động tác này thì phải làm thế nào ạ? Em đã record macro nhưng không thấy có dòng code nào xuất hiện cả, kính mong các anh chị giúp đỡ.
PS: Code hiện tại của em em thấy nó chạy hơi chậm, có cách nào tăng tốc lên không ạ?
Em cám ơn!

 

[ptm0412]

Tạo 1 name động và gán name đó cho data source
Khuyến mãi câu lệnh autorefresh

 

[LYSM]

Tạo 1 name động và gán name đó cho data source
Khuyến mãi câu lệnh autorefresh

Vâng, cách đơn giản vậy mà em lại quên khuấy đi không nghĩ ra, cứ loay hoay tìm code VBA. Bác cho em hỏi Sub Tile của em có cách nào chạy nhanh hơn được không ạ? Em viết thấy nó chạy đúng ý rồi nhưng có vẻ hơi chậm, nếu dữ liệu lên đến vài 10.000 dòng chắc nó đơ quá