Скопировать сводку как значения

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