Code lập Pivot Table ra định dạng không như dùng Macro

Liên hệ QC

kobebryant

Thành viên thường trực
Tham gia
7/8/09
Bài viết
248
Được thích
28
Mình viết 1 code để tạo Pivot Table, nhưng không hiểu sao ở trường Values khi cho nhiều value vào thì Pivot Table không ra như mong muốn. Nó xuất hiện thêm Filed Values ở trường Rows
Trong file ví dụ, mình có 1 sheet ra pivot như mong muốn và 1 sheet nó chạy ra lỗi.
Mong anh em chỉnh lại code giúp mình. Xin cám ơn.
 

File đính kèm

  • Vidu.xlsm
    487.2 KB · Đọc: 6
Trả lời cách xử lý bằng tay:

1594306704389.png

Code: thêm 1 câu lệnh ngay trước End With
HTML:
        .DataPivotField.Orientation = xlColumnField
 
Lần chỉnh sửa cuối:
Upvote 0
Web KT
Back
Top Bottom