refresh pivot table top10

Hai un problema con Excel?

Nuova discussione

refresh pivot table top10
di giac (utente non iscritto) data: 05/06/2014 11:04:50
Ciao,
ho un problema con una pivot table, spero possiate aiutarmi!!
Ho una pt sullo sheet "P1", e il relativo grafico è sullo sheet "Dashboard".
Su un foglio inserisco nuovi dati e voglio che le pt si aggiornino di conseguenza.
Ho creato un pulsante su "Dashboard" che mi fa il refresh di tutte le pt nel wb ma, se le altre vengono aggiornate correttamente, quella nel foglio "P1" (a cui ho dato il nome "top10refunds") non si aggiorna correttamente e nemmeno il relativo grafico su "Dashboard".
Il grafico che ho è un istogramma a barre (orizzontale) con i valori top10 dei team call center, ordinati dal più grande al più piccolo secondo la colonna "importo (€)".
Ho provato a registrare una macro ma non funziona!! Posto il codice sotto. Grazie mille!!

Sub top10PivotTable()

    Sheets("P1").Select
    ActiveSheet.PivotTables("top10refunds").PivotFields("TEAM_CALL_CENTER"). _
        PivotFilters.Add Type:=xlTopCount, DataField:=ActiveSheet.PivotTables( _
        "top10refunds").PivotFields("importo (€)"), Value1:=10
    Sheets("Dashboard").Select
    ActiveSheet.ChartObjects("top10refundsChart").Activate
    ActiveChart.PlotArea.Select
    ActiveChart.Axes(xlCategory).Select
    ActiveChart.Axes(xlCategory).ReversePlotOrder = True

End Sub

Vuoi Approfondire?