pivotfields

Hi everyone, I have a problem with this code: Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable) Dim ws As Worksheet Dim pv As PivotTable Dim pf As PivotField Set ws = ThisWorkbook.Worksheets("Atleti e Media") Set pv = ws.PivotTables("PerATleta") Set...

Hi All, Facing issue with creating pivot table in loop. It's giving error: "Unable to get the PivotFields property of the PivotTable class" Here's the code: Sub PivotTableLoop() Dim ws As Worksheet Dim PivC As PivotCache Dim PivT As PivotTable Dim Table As ListObject For Each ws In...

Hello Community, Looking for a little VBA love. Current macro simply done by recording. So I couldn't screw up the language code. I have 2 sheets: 1 for Brands and Brands Top Gain Loss. I would like to get rid of one sheet and allow a macro for Sort by "Dollar Sales" and "Dollar Sales Chg YA"...

Hey Guys, I have series of sub functions running through, while running I need a User form to pop up asking user to select pivot filters. I've broken it down to steps while running sub. Step 1 (Macro Running): I will be creating a pivot table (say PT1) with all pivot items selected initially...

Hello, I'm trying to cycle trough values in very simple Pivot Table. Two rows and one Sum value. Now I see the very strange shift during the cycle - please see the screenshot. Yellow outlined cells are shifted - with the incorrect "Month". Red outlined cells are the duplicates - they are the...

I have a pivot table and I'd like to filter by pivotfield: "Inspectionitem". I'd originally done it like this: 'data worksheet and cache defined up here Set pt1 = ActiveSheet.PivotTables.Add(cacheofpt1, Range("A1"), "DP_Electrical") 'put the feilds in With pt1'blahblahblah other pivotfields...

I've tons of examples on here of how to reference a PivotValue and even find the Row source, but not quite what I'm looking for. I have a pivot table that is made from a summary of 3 different tables so the drill down doesn't work on it. I want to use the BeforeDoubleClick and just write it...

Morning all (well its morning here) :) I have a pivot table that I need to make change from SUM to Average depending on what slicer button is selected. Initially I had a few issues in that the code caused an endless loop, however I solved that by adding Application.EnableEvents = False at the...

Hi all, I'm using Excel 2013 and trying to use a string variable in the PivotFields option. I nearly have everything I need working but I keep getting the below error: PivotFields method of PivotTable class failed The problem line lies here: ActiveSheet.PivotTables(pt.Name).PivotFields...

I need to create a report heading that says "Includes YTD sales thru xx/xx/xxxx." I would like to write a VBA which dynamically assigns the maximum sales date that was located within a pivot table field (PivotItem list). Notice that I didn't say that I want to change the filter... I only...

Hello VBA Gurus, Could really use your expertise. I'm trying to create a project schedule that can be filtered by region. The only way I found to do that was to create Pivot Tables and filter each one. I need to be able to automatically create the pivot tables and filter each caption by...

Hi, I am trying to filter a pivot table field named ("id") with ID="xyz". Below is the code I am using however I am getting a application or object defined error. Please let me know how to fix this error. Thanks for your help. Sub filter() With Worksheets("xyz").PivotTables(1)...

I have a pivot table with date as a page field. I have the following code which works on the surface, it does change the page field to the most recent date that is stored in cell H7. But the pt does not change - it is not recognizing the date. I tried refreshing again but it changes the date...