Question

我正在尝试将我的数据透视表的值复制到另一个位置：

Sub PivotCopy()


Worksheets("Dashboard").PivotTables("PivotTable2").TableRange2.Copy Destination:=Worksheets("Dashboard").Range("U6")


End Sub

它正在复制枢轴，但我只希望复制值;任何想法如何解决？

Answer 1

这应该有用。

Sub PivotCopy()

Sheets("Dashboard").PivotTables("PivotTable2").TableRange2.Copy     
Sheets("Dashboard").Range("U6").PasteSpecial xlPasteValues


End Sub

将数据透视为值

1 个答案: