Delete a Pivot Table

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I have a Worksheet with a bunch of Controls (combo boxes, text boxes, etc)
and a Pivot Table. I need to be able to programmatically delete or remove the
Pivot Table without deleting the Worksheet (because I need to keep the
Controls intact). Does anyone know how to do that? BTW, even if it can't be
done programmatically, is there a way to do it manually? Thanks in advance.
Best Regards,
Dean
 
Dean,
The help file is not much help on this one.
(I think the summer intern must have come up with this one)<g>

ActiveSheet.PivotTables("name").TableRange2.Clear
--
Jim Cone
San Francisco, USA
http://www.realezsites.com/bus/primitivesoftware
(Excel Add-ins / Excel Programming)


"SaeOngJeeMa"
<[email protected]>
wrote in message
I have a Worksheet with a bunch of Controls (combo boxes, text boxes, etc)
and a Pivot Table. I need to be able to programmatically delete or remove the
Pivot Table without deleting the Worksheet (because I need to keep the
Controls intact). Does anyone know how to do that? BTW, even if it can't be
done programmatically, is there a way to do it manually? Thanks in advance.
Best Regards,
Dean
 
To delete the first pivot table on the active sheet:

ActiveSheet.PivotTables(1).TableRange2.Clear
 
Back
Top