accorpare celle contenenti stessa data

[mabias]

Salve a tutti, avrei bisogno del vostro aiuto per risolvere un problemino con excel. In pratica dovrei ottenere un report da un elenco accorpando le celle contenenti lo stesso gruppo data/orario e sommando i valori delle celle poste sulla stessa riga. Posto un esempio di come è l'elenco:

01/09/2008 0.00..... 01/09/2008 1.00..... 1..... 0..... 0..... 0..... 0
01/09/2008 0.00..... 01/09/2008 1.00..... 0..... 1..... 0..... 0..... 0
01/09/2008 0.00..... 01/09/2008 1.00..... 0..... 0..... 1..... 0..... 0
01/09/2008 1.00..... 01/09/2008 2.00..... 3..... 0..... 0..... 0..... 0
01/09/2008 1.00..... 01/09/2008 2.00..... 0..... 3..... 0..... 0..... 0
01/09/2008 1.00..... 01/09/2008 2.00..... 0..... 0..... 3..... 0..... 0
01/09/2008 2.00..... 01/09/2008 3.00..... 4..... 0..... 0..... 0..... 0
01/09/2008 2.00..... 01/09/2008 3.00..... 0..... 2..... 0..... 0..... 0
01/09/2008 2.00..... 01/09/2008 3.00..... 0..... 0..... 2..... 0..... 0
01/09/2008 2.00..... 01/09/2008 3.00..... 0..... 0..... 0..... 2..... 0
01/09/2008 2.00..... 01/09/2008 3.00..... 0..... 0..... 0..... 0..... 2
ecc....

e di cosa vorrei ottenere come risultato finale:

01/09/2008 0.00..... 01/09/2008 1.00..... 1..... 1..... 1..... 0..... 0
01/09/2008 1.00..... 01/09/2008 2.00..... 3..... 3..... 3..... 0..... 0
01/09/2008 2.00..... 01/09/2008 3.00..... 4..... 2..... 2..... 2..... 2
ecc....

Pensate sia possibile in qualche modo evitare di farlo manualmente?

Grazie per la cortese disponibilità

Saluti

Maurizio

[Tribuno]

Ciao e benvenuto mabias,

sì, quello che vuoi ottenere si può gestire in automatico con excel.
Se ho capito bene, nelal riga (ammettiamo) 2 hai: A2=data+orario (cella formattata con visualizzazione data e orario), B2 valore numerico, C2 valore numerico, ecc. fino ad una determinata colonna (ammettiamo F, perché mi sembra di capire che hai 5 valori), poi da G2 si ripetono gli stessi dati (Data+ora, valore, valore, ecc.).
Oppure data+orario sono sia in A sia in B (tipo dalle...alle) e i 5 valori in C,D,E,F,G?
Il risultato lo vuoi ottenere su un altro foglio, su un altro file o sullo stesso foglio cancellando quelli esistenti dopo l'accorpamento?

Ciao
Tribuno

[Tribuno]

Ciao,
se i dati sono:
colonna A, da riga 1: data e ora (equivale a: dalle)
colonna B, da riga 1: data e ora (equivale a: alle)
colonna C, da riga 1: valore numerico
colonna D, da riga 1: valore numerico
colonna E, da riga 1: valore numerico
colonna F, da riga 1: valore numerico
colonna G, da riga 1: valore numerico

prova questa macro, con la raccomandazione di effettuare, prima delle prove, almeno due copie di sicurezza del tuo file originale:

Codice: Seleziona tutto

Dim NumRigTOT As Integer, NumRig As Integer, DT As Integer, I As Integer

Sub Raggruppa_mabias()
NumRigTOT = Range("A65536").End(xlUp).Row
NumRig = 1
While Cells(NumRig, 1) <> ""
    DT = 0
    If Cells(NumRig, 1) = Cells(NumRig + 1, 1) Then
        While Cells(NumRig, 1) = Cells(NumRig + DT + 1, 1)
            DT = DT + 1
        Wend
        For I = 3 To 7
            Valore = Application.WorksheetFunction.Sum(Range(Cells(NumRig, I), Cells(NumRig + DT, I)))
            Cells(NumRig, I) = Valore
        Next I
        Range(Cells(NumRig + DT + 1, 1), Cells(NumRigTOT + 1, 7)).Copy Destination:=Cells(NumRig + 1, 1)
        Range(Cells(NumRigTOT - DT + 1, 1), Cells(NumRigTOT + 1, 7)).ClearContents
        NumRig = NumRig + 1
        NumRigTOT = NumRigTOT - DT
    Else
        NumRig = NumRig + 1
    End If
Wend
End Sub


da excel Alt+F11, Inserisci--->modulo, nel frame di destra incolli il codice, Alt+F11 per ritornare ad excel, Alt+F8, scegli la macro Raggruppa_mabias, esegui.

Ciao
Tribuno

[Anthony47]

Pero' si puo' fare anche con una tabella pivot.
ti accerti che le colonne da A a G abbiano una intestazione (supponiamo che siano semplicemente AA, BB, CC, etc)
-Selezioni le colonne A:G
-menu /Dati /Rapporto tabella pivot; Avanti, Avanti; Layout
-trscini dall' elenco di dx la voce AA nel campo Riga, poi CC, DD, fino a GG nel campo Dati, uno a uno e controllando che venga visualizzato "Somma di CC" (non, ad esempio, "Conteggio di CC"); se non ok, doppioclick sulla voce errata, scegliere Somma dall' elenco, Ok.
-Scegliere se si vuole la tabella su un foglio nuovo o su uno spazio libero del foglio attuale, Fine.

L' elenco verra' creato in verticale, ma si puo' poi scegliere, con Formato Rapporto, un layout orizzontale.

Spero che aiuti, ciao.

[mabias]

Grazie ad Anthony ed a Tribuno per la pronta risposta. Per il momento ho provato la macro di Tribuno e realizza proprio quello di cui avevo bisogno. In effetti le prime due colonne di dati sono un range orario (dalle-alle) di una stessa data e, nel report iniziale, ho un numero di righe con lo stesso gruppo data/orario pari a quante sono le colonne successive (da C a G) che contengono valori diversi da 0. Come si può infatti vedere dall'esempio postato in precedenza nella fascia oraria 0.00 - 1.00 ho tre righe per tre valori diversi da zero nelle colonne C D E, nella fascia
1.00 - 2.00 ugualmente tre righe per valori diversi da zero nelle stesse colonne, mentre nella fascia
2.00 - 3.00 ho cinque righe perchè i valori diversi da zero sono in tutte le colonne da C a G.

Va benissimo anche il fatto che il risultato del raggruppamento non venga riportato in un altro foglio.

Sono curioso anche di testare il metodo di Anthony, per il momento ancora un grazie e, se avrò bisogno, ora so dove chiedere.

Ciao

Maurizio