PivotTables

[Guest]

How can you check in VBA code whether a sheet of data has already a pivot
table attached to it (on the same sheet or on a separate sheet)?

Thank you in advance for any help.

 

[Debra Dalgleish]

You can count the pivot tables, e.g.:

If ActiveSheet.PivotTables.Count Then
MsgBox "There is a pivot table"
Else
MsgBox "There are no pivot tables"
End If

 

[Guest]

Unfortunately, that code only works when you are on the sheet that has a
pivottable on it, but not for tables on sheets separated from the original
data

 

[Guest]

Then either activate the sheet (Worksheets("whatever").Activate), or just use
the sheet's name directly (Worksheets("whatever").PivotTables.Count).

--
* Please click Yes if this was helpful *
Andy Smith
Senior Systems Analyst
Standard and Poor''s, NYC

 

[Debra Dalgleish]

Is there just one worksheet with data in the workbook? Are you trying to
determine if a pivot table has been created from that data, somewhere in
the same workbook?