Automatically selecting print area based on Pivot Table size

Hoping somebody can help me with this. I'm trying to implement code into excel that will setup the print area of the worksheet based on the size of the pivot table (since it is the only object on the sheet. The pivot table's size will grow month to month, so cell reference is irrelevant.

Below is the code I came up with:

Dim Rng As Range
Set Rng = ActiveSheet.PivotTables("EEVPivot").TableRange2
Rng.Select
ActiveSheet.PageSetup.PrintArea = Rng

Of course, this gives me the error

"Unable to set the PrintArea property of the PageSetup class"

What am I doing wrong?? Is there anybody out there who can help???

PageSetup.PrintArea requires a string in A1 style.

Please Login or Register  to view this content.

I notied that it does select the area of the pivot table, but also noticed that it is including a lot of page breaks