[Excel] Formattazione tabella pivot con subtotali in alto

[Zelia]

Ciao a tutti vi spiego in breve il mio problema:

Premetto di essere in possesso della versione di Excel 2002.

Brevemente:

Ho creato una tabella pivot che mi va a ordinare Nome - data- fat - importo.

Vorrei vedere nella mia tabella pivot i dati raggruppati secondo nome e far si che via sia per prima riga il nome con relativo subtotale e poi sotto l'elenco delle varie fatture con i singoli importi.

Per far si che il sub totale sia in alto ho impostato da Impostazioni campo --> Layout -->mostra gli elementi sottoforma di struttura --> sub totali in alto.

Facendo però questo passo, non riesco più impostare che tutte le rige con il subtotale abbiano uno sfondo e una dimensione di carattere differente.

Come posso risolvere?

[ricky53]

Ciao,
prima di tutto benvenuto/a nel forum.

Dalla barra Tabella Pivot seleziona "Formato rapporto" qui trovi diversi formati, probabilmente torverai quello che ti soddisfa.

Puoi invia un'immagine della struttura dei tuoi dati e dalla tabella pivot che hai costruito, se corredi il tutto con un file di esempio potrei/potremmo essere più precisi.

[Zelia]

appena posso ti linko il link del file

[ricky53]

Ottimo, attendo.

[Zelia]

Scusa ma non riesco a mettere i link

[ricky53]

Ciao,
hai eseguito quanto scritto QUI ???

[Zelia]

Ciao..

Pro ad allegarti il file esempio

http://rapidshare.com/files/455116824/Prova.xls


se guardi la seconda tabella pivot e come la vorrei ma non riesco a formattarla, perche appena faccio aggiorna perdo la formattazione.

[Zelia]

avevo visto il link..ma non mi lasciava postare i link ad altre pagine

[ricky53]

Ciao,
avvia il registratore di macro e formatta la tabella come ti occorre, fermato il registratore, vai nell'editor del VB con "Alt+F11", inserisci il codice su uno dei seguenti eventi del foglio nel quale hai inserito la tabella.
Inizia con il primo e PROVA e ...

Codice: Seleziona tutto

Private Sub Worksheet_Activate()
   Application.EnableEvents = False
‘ qui inserisci il codice di formattazione pivot
   Application.EnableEvents = True
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
   Application.EnableEvents = False
‘ qui inserisci il codice di formattazione pivot
   Application.EnableEvents = True
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   Application.EnableEvents = False
‘ qui inserisci il codice di formattazione pivot
   Application.EnableEvents = True
End Sub

[Zelia]

Grazie mille della risposta..

Ottimo.