Condividi:        

Tabella pivot di più fogli

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Tabella pivot di più fogli

Postdi fastbike73 » 22/08/17 14:13

Buonasera a tutto il forum,
avrei necessità di analizzare i dati presenti in più foglio della stessa cartella di lavoro
tramite una sola tabella pivot da creare nel foglio1.
Le intestazioni di colonna sono identiche in tutti i fogli, le righe (trattandosi di movimentazione di articoli
di magazzino) non sempre sono uguali sia come intestazione che come numero di righe utilizzate nel foglio.
I fogli al momento sono 7 (da gennaio a luglio) e al massimo possono arrivare a 12 (Dicembre).
La necessità è quella di analizzare i dati filtrandoli tramite tabella pivot.
Mi suggerite qualcosa che mi permetta di aggiornare la tabella con i dati dei fogli che man mano
si aggiungeranno a quelli già presenti?
fastbike73
Win 10 & Office365
Filemaker Pro v. 13
fastbike73
Utente Senior
 
Post: 256
Iscritto il: 23/04/14 10:54

Sponsor
 

Re: Tabella pivot di più fogli

Postdi Anthony47 » 23/08/17 00:57

La prima cosa che mi viene in mente e' di preparare sempre la struttura dati dei 12 mesi e poi creare una tabella utilizzando l'opzione "Piu' intervalli di consolidamento", come descritto qui:
https://support.office.com/it-it/articl ... ella-pivot

Oppure crei un foglio "Anno" in cui copi i dati di tutti i mesi, e la tabella pivot e' creata sui dati del foglio Anno.
Per consolidare i fogli mensili potresti usare questa macro:
Codice: Seleziona tutto
Sub Consolid()
Dim CopyCol As String, Last1 As Long, NextR As Long, I As Long, noHead As Long
'
CopyCol = "A1:H1"       '<<< Le vere intestazioni delle colonne da copiare
For I = 1 To 12
    With Sheets(Format(DateSerial(2017, I, 1), "Mmmm"))
        Last1 = .Range(CopyCol).Range("A1").Offset(50000, 0).End(xlUp).Row - .Range(CopyCol).Range("A1").Row
        If I = 1 Then Last1 = .Rows.Count - .Range(CopyCol).Range("A1").Row
        If I = 1 Then NextR = 1 Else NextR = Sheets("Anno").Cells(Rows.Count, 1).End(xlUp).Row + 1
        .Range(CopyCol).Offset(noHead, 0).Resize(Last1).Copy Sheets("Anno").Cells(NextR, 1)
        noHead = 1
'        If I > Month(Now) Then Exit For        '*** Vedi Nota*
    End With
Next I
MsgBox ("Consolidamento completato...")
End Sub

Tutti i fogli mensili devono gia' esistere quando esegui la macro, e devono chiamarsi Gennaio, Febbraio, Marzo, etc; come pure deve gia' esistere il foglio Anno.

Nota*: eliminando l'apostrofo a inizio della riga marcata *** allora l'ultimo foglio consolidato corrispondera' al mese corrente, e teoricamente i fogli dei mesi futuri potrebbero essere non ancora presenti nel file.

La riga marcata <<< va personalizzata come da commento.
Tieni presente che il foglio Anno non viene "aggiornato", ma viene ricompilato completamente ogni volta partendo

Puoi "dare in pasto" alla tabella pivot le intere colonne del foglio Anno, in modo che man mano che si aggiungono nuovi mesi i nuovi dati vengano automaticamente presi in considerazione, per cui bastera' fare "Aggiorna" sulla tabella pivot per avere i dati aggiornati.


Ciao

Keywords
Excel Consolidamento dati Riepilogare dati Unificare fogli Consolidare piu' più fogli
Data consolidate consolidation
Avatar utente
Anthony47
Moderatore
 
Post: 19228
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Tabella pivot di più fogli

Postdi fastbike73 » 23/08/17 17:25

Buonasera Anthony, grazie per la risposta. Proverò a seguire il secondo metodo che mi hai suggerito
in quanto non riesco ad aprire la pagine del link che hai inserito nella risposta.
Appena finisco posto l'esito o l'eventuale problema riscontrato.
Grazie ancora.

Ciao
fastbike73
Win 10 & Office365
Filemaker Pro v. 13
fastbike73
Utente Senior
 
Post: 256
Iscritto il: 23/04/14 10:54

Re: Tabella pivot di più fogli

Postdi Anthony47 » 24/08/17 00:59

Avatar utente
Anthony47
Moderatore
 
Post: 19228
Iscritto il: 21/03/06 16:03
Località: Ivrea


Torna a Applicazioni Office Windows


Topic correlati a "Tabella pivot di più fogli":


Chi c’è in linea

Visitano il forum: Nessuno e 80 ospiti