Pivot Table Select Date

[Littlemalky]

I have a workbook with multiple tabs. One of the tabs is designated for pivot tables, in which there are multiple. I need the code to refresh all the pivot tables.

Secondly, under one of the 4 report filters on one of the pivots, I need to check the most recent date. This particular filter is entitled "RAW PROD ND DATE" and the drop down gives a bunch of dates. So the only one i need to filter is the most recent date formatted mm/dd/yy.

How do I do this?

 

[texasalynn]

take a look at this

Sub RefreshAllPivots()

Dim pt As PivotTable

    For Each pt In ActiveSheet.PivotTables

        pt.RefreshTable

    Next pt   

End Sub

 

[Littlemalky]

For whatever reason it highlights the "pt.RefreshTable" line red for me.

Do you have any idea how to help me on the second part of my question?

 

[texasalynn]

I would suggest that the activesheet be changed to the real sheet name

For Each pt In ActiveSheet.PivotTables


Sheets("yourtabnamehere").PivotTables

 

[Littlemalky]

Thanks for the help thus far, but it's still getting an error on that same line

Sub AllWorksheetPivots()
    Dim pt As PivotTable
    For Each pt In Sheets("BUYER PIVOT").PivotTables
        [COLOR=red]pt.RefreshTable
[/COLOR]    Next pt
End Sub

 

[texasalynn]

if you hover you mouse over the "pt" what does that show? Does that result make sense to you? Is it a valid pivot table on the sheet?

 

[Littlemalky]

I'm sorry, I'm new at this. I hovered my mouse over that area and nothing comes up so I'm not sure what you mean entirely. Secondly, what makes a pivot table unvalid? There are multiple pivots on this worksheet and they are all standard so I'm not sure what you mean by that either.

 

[texasalynn]

when you get an error on the code, click debug, that opens up the code and now in the code hover you mouse over the "pt"
pt.RefreshTable

 

[Littlemalky]

You know what, I tried to refresh the pivot tables manually, and it's saying "The PivotTable Fieldname is not valid. blah blah blah". I think you're right about that.

 

[texasalynn]

ok glad you figured it out - so once you get any errors corrected, hopefully the code will work right.