Lọc dữ liệu trong Pivottable giữa 2 khoảng thời gian bằng VBA

[songcham85]

Em có tìm được 1 file VBA giải quyết vấn đề lọc dữ liệu trong Pivottable giữa 2 khoảng thời gian bằng VBA, nhưng load về thì bị lỗi định dạng ngày tháng như hình dưới, mong các anh chị coi lỗi giúp em. Em cám ơn.

 

[Sputnhik]

Pivot luôn không cần sử dụng VBA.

 

[songcham85]

Cám ơn anh. Anh có thể chỉ rõ các bước thực hiện ntn được không ạ ?

Pivot luôn không cần sử dụng VBA.

 

[Sputnhik]

Bạn add cái bảng ngày lọc vào Data Model. Add tiếp cái bảng dữ liệu vào Data Model
Trong Power Pivot thêm 1 cột để tính tổng theo ngày lọc và gõ cái công thức vào là xong.

 

[ptm0412]

Không cần VBA Date from, Date to, không cần Power Pivot với Data model. Chỉ cần dùng timeline, kiểu gì cũng được (năm, quý, tháng, ngày)

 

[songcham85]

Dạ do dữ liệu của em chủ yếu là ngày, em biết cách dùng timeline liên kết các pv rồi ạ. Nhưng do muốn linh hoạt hơn trong backtest dữ liệu nên muốn dùng cell ở ngoài sheet tham chiếu cho nhanh ạ.
Cho e hỏi, là code vba trong file đính kèm sai chỗ ạ.

 

[ptm0412]

Dạ do dữ liệu của em chủ yếu là ngày, em biết cách dùng timeline liên kết các pv rồi ạ. Nhưng do muốn linh hoạt hơn trong backtest dữ liệu nên muốn dùng cell ở ngoài sheet tham chiếu cho nhanh ạ.
Cho e hỏi, là code vba trong file đính kèm sai chỗ ạ.

Code không sai, chỉ là anh PivotField và Pivot value trong VBA khó tính. Dữ liệu rõ ràng là Date, kiểm tra IsDate() ra True mà nó không chịu.
Bạn sửa thành Value2 là được

Value1:=Range("C4").Value2, Value2:=Range("C5").Value2