Hello All,
Thanks for considering my post. I have been trying to figure this out on my own, but I get an error message. So far I just have this code which is sad...
Sub blah
Dim pt As PivotTable
Set pt = ActiveSheet.PivotTables(1)
Pt.PivotFields("Item Desc").DataRange.Select
Selection.Copy
So, I got it copying all the data. I get an error message when I try to paste it to what I call sheet f. I want the data to begin to be pasted in sheet f -> starting in B3 and copying all the way down until there isn't any more data to paste. How can I make this happen?
Many Thanks!
Bookmarks