PivotTable Name

[MikeDBMan]

The last line of code below errors out. What is the proper syntax for getting the name of the pivot table that is in A2?

Sub GetPTName
Dim PTCache As PivotCache, PT As PivotTable
Set PTCache = ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase,SourceData:=Range("A2").CurrentRegion)

Set PT = ActiveSheet.PivotTables.Name
end sub

 

[cainey1991]

Hey,

this is what I am using in mine at the moment.
ActiveSheet.PivotTables("PivotTable1")

you can then add:
ActiveSheet.PivotTables("PivotTable1").PivotFields("pivotfieldfield") more added functionality.

Hope this helps.

 

[RoryA]

It would be just:

Range("A2").PivotTable.Name

 

[MikeDBMan]

Rory,
So I've tried doing Let PT=range("A2).PivotTable.name and I get "Unable to get the PivotTable property of the Range class.

I've tried Set PT (with PT dimmed as PivotTable) and Let PT (With PT DImmed as string). Neither works.

And cainey, it is not PivotTable1, I can see that when I check manually.

What I want to do is assign a slicer to the pivot table. I think I need the name and then hopefully I can issue this code: (Where PT is the variable name I assigned from the code I can't figure out.

    ActiveWorkbook.SlicerCaches.Add(ActiveSheet.PivotTables(PT), _
        "CC Description").Slicers.Add ActiveSheet, , "CC Description", "CC Description" _
        , 207.75, 450, 144, 198.75

 

[RoryA]

Then A2 is not part of a pivot table. (From the code it looks like it's part of the source data)

Also, you can't assign the name of a pivot table, which is just a String, to a PivotTable object variable.

 

[MikeDBMan]

So how can I add a slicer to an existing pivot table? I can't seem to figure out how to do it.

 

[RoryA]

In code or manually?

 

[Eisasuarez]

Then A2 is not part of a pivot table. (From the code it looks like it's part of the source data)

Also, you can't assign the name of a pivot table, which is just a String, to a PivotTable object variable.

Isnt pivot table and source data the same thing? Ie the source data makes the pivot table so when you say a2 is not part of the pivot but source, I'm not quite sure what you mean. I thought it was the same

 

[RoryA]

The pivot table is the graphical summary of the source data - the two can't be in the same place.

 

[MikeDBMan]

In code or manually?

I want to do it within VBA. And I need multiple versions of the same pivottable on different tabs. It seems if I have the PivotTable with a slicer on a tab and then duplicate that entire tab and change the slicer, it changes the slicer on the first tab, not the newly-copied tab. I can live with that but it is a little hard to work with.