Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

accorpare celle contenenti stessa data

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

accorpare celle contenenti stessa data

Postdi mabias » 06/10/08 14:20

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
mabias
Newbie
 
Post: 2
Iscritto il: 06/10/08 13:39

Sponsor
 

Re: accorpare celle contenenti stessa data

Postdi Tribuno » 06/10/08 15:37

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
Avatar utente
Tribuno
Utente Senior
 
Post: 181
Iscritto il: 22/08/08 19:24

Re: accorpare celle contenenti stessa data

Postdi Tribuno » 06/10/08 20:06

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
Avatar utente
Tribuno
Utente Senior
 
Post: 181
Iscritto il: 22/08/08 19:24

Re: accorpare celle contenenti stessa data

Postdi Anthony47 » 06/10/08 21:58

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.
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13904
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: accorpare celle contenenti stessa data

Postdi mabias » 07/10/08 08:14

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
mabias
Newbie
 
Post: 2
Iscritto il: 06/10/08 13:39


Torna a Applicazioni Office Windows


Topic correlati a "accorpare celle contenenti stessa data":


Chi c’è in linea

Visitano il forum: Nessuno e 9 ospiti

cron