Excel 2007 VBA: Copy pivot table

Hello,
I want to copy the numbers (numbers only) in a pivot table to another worksheet by using VBA.

The following code works if I use debug mode. However, if I run the code in an ordinal way, the pivot table is not pased in another sheet.

Please help



pvt.PivotSelect "", xlDataAndLabel, True
Selection.Copy

Worksheets("final").Range("A1").Offset(0, column_location).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
reference_row_last = Worksheets("Reference page").Cells(Rows.count, reference_column).End(xlUp).row