Mostrare grafico pivot solo se viene applicato un filtro

[fastbike73]

Buongiorno, ho una tabella pivot con tre campi. Collegato alla tabella pivot un grafico pivot. La mia esigenza è quella di mostrare il grafico pivot solo se viene applicato un filtro alla tabella pivot. Se non viene applicato il grafico non deve essere visibile (anche perché contenendo un quantitativo elevato di informazioni senza filtro nel grafico risulterebbero illegibili). E' possibile alimentare il grafico soltanto se viene applicato un filtro alla tabella pivot?
Vi ringrazio anticipatamente dell'interesse e dell'aiuto che potrete darmi.

Fastbike73 (Fausto)

[Anthony47]

Allora...
Tu hai una tabella pivot, a cui hai collegato un grafico
Si potrebbe verificare se ogni PivotItem di ogni PivotField sia visualizzato, per determinare se un qualsiasi filtro sia applicato. Visto che hai Office 2013 preferisco invece suggerire di usare uno "slicer", cioe' un filtro Dati o un filtro Sequenza temporale (mi pare ne avessimo gia' parlato in passato)

Operativamente:
-seleziona una cella della tabella pivot; poi Menu /Inserisci /Filtro dati (gruppo Filtri)
-scegli il Campo su cui inserire il filtro, Ok; ti verra' creato l'elemento FiltroDati gia' collegato alla tua tabella pivot. Puoi usare questo elemento per decidere cosa filtrare nella tabella e di conseguenza nel grafico. Puoi scegliere di avere una sola scelta o puoi avere scelte multiple, lo imposti tu.
-memorizza il nome dato all'elemento: tasto dx sull'elemento, Impostazioni filtro dati; prendi nota del "Nome da utilizzare nelle formule" (intanto se vuoi puoi cambiare la didascalia dell'intestazione).

Ora fai tasto dx sul tab col nome del foglio di lavoro; scegli Visualizza codice.
-nella pagina che si apre copia questo codice:

Codice: Seleziona tutto

Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
Me.ChartObjects("Grafico 1").Visible = Not ThisWorkbook.SlicerCaches("IlNomeDelFiltro").FilterCleared
End Sub


Invece che "Grafico 1" metti il vero nome del tuo grafico (lo vedi nella "Casella Nome" quando selezioni il grafico)

A questo punto torna sul foglio di lavoro, togli e metti dei filtri; se sono visualizzati tutti gli elementi del filtro dati allora il grafico dovrebbe venire nascosto, se se ne disabilita almeno 1 il grafico torna visibile

Prova e fai sapere...

[fastbike73]

Buongiorno Anthony, ti ringrazio per l'interesse e per l'aiuto. Provvedo ad inserire filtro dati e codice e ti faccio sapere.
Grazie, sei sempre infinitamente gentile e preciso!!

[fastbike73]

Dunque Anthony ho seguito le tue istruzioni però rileva un errore "Chiamata di routine o argomento non validi".
Ti allego il file così puoi controllare. i dati sono reperibili nel sito della borsa italiana quindi di pubblico dominio.
Ancora grazie per il tempo, l'interesse e l'aiuto.

Fastbike73 (Fausto)

http://www.filedropper.com/gestionetitoli

[Anthony47]

memorizza il nome dato all'elemento: tasto dx sull'elemento, Impostazioni filtro dati; prendi nota del "Nome da utilizzare nelle formule"

Sei stato poco attento: il nome dell'oggetto e' "FiltroDati_Nome_dell_emittente" e non "Nome dell'emittente" che hai usato nel codice

Ciao

[fastbike73]

Come al solito tutto perfetto!!!!! Grazie Anthony e perdona la mia disattenzione. Alla prossima.

Fastbike73 (Fausto)