Cảm ơn bác, em rút kinh nghiệm ạ.Đứng tại Chuối hay khoai, Insert 1 calculated item theo hình. Nhớ viết bài đừng viết kiểu chat chit như "ah", nó vô nghĩa.
View attachment 266102
Pivot table không có tính năng lưu giữ định dạng. Bạn viết 1 thủ tục VBA và 1 nút nhấn:Vẫn bài này nhưng nếu em thêm Slicer để chọn xem theo ngày thì giá trị Total lại quay về dạng biểu đồ cột chứ không phải dạng Line như đã định dạng trước đó. Kính mong anh em chỉ giúp ạ.
Sub abc()
ActiveSheet.ChartObjects("Chart 1").Activate
ActiveChart.FullSeriesCollection(7).ChartType = xlLine
End Sub
Vâng, em cảm ơn bác ạ.Pivot table không có tính năng lưu giữ định dạng. Bạn viết 1 thủ tục VBA và 1 nút nhấn:
Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
If Target.Name = "PivotTable2" Then
ActiveSheet.ChartObjects("Chart 1").Activate
ActiveChart.FullSeriesCollection("Total").ChartType = xlLine
End If
End Sub