Hey, sorry I didn't think to look back here until this
afternoon... hope you're still looking.

You wrote:
I'm no where near a VBA guru so could you explain how I
achieve point 1.


Try this...

assuming that the sheet where your pivot table is located
is called pvTable, add a code line:

Sheets("pvTable").cells.delete

That will eliminate the original pivot table, but not
delete the sheet itself.

Then, in your existing code, where it said:

TableDestination:=""

change that line to:

TableDestination:= Sheets("pvTable").Range("a3")


After those two changes, your code should be able to run
repeatedly and only end up with one pivot table.