Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Delete all pivot tables on a sheet
I make a copy of a sheet containing a number of pivot tables and then
try to delete the existing pivot tables on the new sheet with: Sub PivotTableClearActiveSheet() Dim p As PivotTable With ActiveSheet For Each p In .PivotTables p.TableRange2.Delete Next p End With End Sub I get the following message: Run-time error '1004': You cannot change , move a part of, or insert cells ... Any clues as to what I'm doing wrong. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Delete all pivot tables on a sheet
Should have been
p.TableRange2.Delete xlShiftUp |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
(2) Pivot Tables on the Same Sheet to have the same Page Field | Excel Discussion (Misc queries) | |||
2 Pivot tables on 1 sheet | Excel Discussion (Misc queries) | |||
2 pivot tables in one sheet | Excel Programming | |||
Can I permanently delete/hide data within Pivot Tables? | Charts and Charting in Excel | |||
How can I delete rows from Pivot Tables in Excel 2000 as in 97 | Excel Discussion (Misc queries) |