CERCA VERT con SOMMA

[bassotto1]

Buonasera

ho una tebella di questo tipo

cod nome gruppo val.
2012 MARIO ROSSI PULITO 1
2012 MARIO ROSSI COTTO 5
2012 MARIO ROSSI VELOCE 1
2012 MARIO ROSSI ROTTO 7
2016 LUIGI BIANCHI PULITO 9
2016 LUIGI BIANCHI COTTO 5
2016 LUIGI BIANCHI VELOCE 4
2016 LUIGI BIANCHI ROTTO 8
2032 CARLO VERDI PULITO 3
2032 CARLO VERDI COTTO 1
2032 CARLO VERDI VELOCE 2
2032 CARLO VERDI ROTTO 5
2039 ANGELO MARRONI PULITO 4
2039 ANGELO MARRONI COTTO 5
2039 ANGELO MARRONI VELOCE 2
2039 ANGELO MARRONI ROTTO 3
2043 ENRICO BLU COTTO 6
2043 ENRICO BLU VELOCE 9
2043 ENRICO BLU ROTTO 8

devo crearne una di riepilogo dove ad ogni NOME corrisponda la somma dei volori di ogni gruppo, indipendentemente dal gruppo stesso

cod nome somma
2012 MARIO ROSSI 14 (cioè 1+5+1+7)

So che probabilmente mi sto perdendo in un bicchiere d'acqua, ma proprio non riesco a venirne a capo.
Grazie anticipatamente a titti coloro che vorranno aiutarmi.

[ricky53]

Ciao,
prova con una TABELLA PIVOT che la soluzione migliore ed è anche la più semplice.

Inoltre le tabelle pivot sono molto versatili.

[bassotto1]

Grazie per la risposta

A dire il vero avevo già pensato ad utilizzare la tabella pivot.

Vi sarei grato però se qualcuno riuscisse ad indicarmi una formula.

Grazie a ana tutti

S.O. W XP, OFFICE 2003

[Flash30005]

Ciao Bassotto1 e benvenuto nel Forum
Questa macro riporta nel "Foglio2" un elenco univoco e i valori corrispondenti a ciascun nome del "Foglio1"

Codice: Seleziona tutto

Sub Totalizza()
Worksheets("Foglio2").Cells.Clear
Worksheets("Foglio2").Range("B1") = Worksheets("Foglio1").Range("B1").Value
Worksheets("Foglio2").Range("C1") = Worksheets("Foglio1").Range("D1").Value
UR1 = Worksheets("Foglio1").Range("B" & Rows.Count).End(xlUp).Row
For RR1 = 2 To UR1
Nom1 = Worksheets("Foglio1").Range("B" & RR1).Value
UR2 = Worksheets("Foglio2").Range("B" & Rows.Count).End(xlUp).Row + 1
For RR2 = 2 To UR2
Nom2 = Worksheets("Foglio2").Range("B" & RR2).Value
If Nom1 = Nom2 Then GoTo SaltaN
Next RR2
Worksheets("Foglio2").Range("B" & UR2).Value = Nom1
SaltaN:
Next RR1
UR2 = Worksheets("Foglio2").Range("B" & Rows.Count).End(xlUp).Row
For RR2 = 2 To UR2
Nom2 = Worksheets("Foglio2").Range("B" & RR2).Value
For RR1 = 2 To UR1

Nom1 = Worksheets("Foglio1").Range("B" & RR1).Value
If Nom1 = Nom2 Then Worksheets("Foglio2").Range("C" & RR2).Value = Worksheets("Foglio2").Range("C" & RR2).Value + Worksheets("Foglio1").Range("D" & RR1).Value
Next RR1
Next RR2

End Sub


Premesso che i nomi siano nella colonna "B2 e i valori nella colonna "D"
Nel caso in cui il tuo schema dati sia diverso adatta la macro alle tue esigenze tenendo conto anche del nome dei fogli (cambiandoli, eventualmente, nella macro)

ciao

[ricky53]

Ciao,
con le formule si complica un po' la vita.

Dopo aver letto la proposta di Flash


prova anche questo file di esempio che utilizza una PIVOT.

Vedrai quanto è semplice sia utilizzarla che modificarla che farne una nuova ... ci vuole solo un po' di esercizio (ossia alcune prove) e ... farai grandi cose.

[bassotto1]

Grazie mille ricky53, è molto utile e penso che utilizzerò questa soluzione.

Una cosa però non mi è chiara: io ho diverse colonne "Valore", cioè "Val.1", "Val2", "Val3", ecc. Come posso fare per "incolonnare" questi dati nella tabella pivot? Infatti se io aggiungo nel campo dati la tabella si sviluppa in verticale, ma a me serve in orizzontale, con i dati incolonnati, perchè poi li devo inserire in un'altra tabella (con cerca vert) da cui ha origine un report.

Ti ringrazio ancora per l'aiuto

S.O. W XP, OFFICE 2003

[ricky53]

Ciao,
non per criticare ma per tentare di arrivare al risultato subito e bene senza proporre soluzioni che poi non possono essere applicate ai tuoi dati.

Avresti dovuto proporre l'esempio rispondente alla tua reale situazione.

Adesso rianalizziamo i dati ma occorre un file di esempio che sia veramente rispondente ai dati reali ma attenzione ai dati riservati.

[bassotto1]

Scusa ricky53, hai perfettamente ragione, ma questo è il risultato dovuto ad una certa "ignoranza" in excel, e poi, onestamente, pensavo fosse più facile.
Venendo a noi, questa è la tabella da cui creare la pivot

cod nome gruppo val.1 val.2 val.3
2012 MARIO ROSSI PULITO 1 3 7
2012 MARIO ROSSI COTTO 5 2 8
2012 MARIO ROSSI VELOCE 1 1 9
2012 MARIO ROSSI ROTTO 7 4 4
2016 LUIGI BIANCHI PULITO 9 5 5
2016 LUIGI BIANCHI COTTO 5 6 6
2016 LUIGI BIANCHI VELOCE 4 9 1
2016 LUIGI BIANCHI ROTTO 8 8 2
2032 CARLO VERDI PULITO 3 7 3
2032 CARLO VERDI COTTO 1 4 3
2032 CARLO VERDI VELOCE 2 5 2
2032 CARLO VERDI ROTTO 5 6 1
2039 ANGELO MARRONI PULITO 4 3 6
2039 ANGELO MARRONI COTTO 5 2 5
2039 ANGELO MARRONI VELOCE 2 1 4
2039 ANGELO MARRONI ROTTO 3 1 9
2043 ENRICO BLU COTTO 6 2 8
2043 ENRICO BLU VELOCE 9 3 7
2043 ENRICO BLU ROTTO 8 5 8

Il risultato dovrebbe essere

cod nome val.1 val.2 val.3
2012 MARIO ROSSI 14 10 28

Come ti dicevo questi dati vengono "pescati" (con cerca vert.) da un'altra tabella da cui, insieme ad altre tabelle, viene generato un report.

Chiedo nuovamente scusa, a te ed a tutti gli utenti del forum, e ti ringrazio anticipatamente per l'aiuto

S.O. W XP, OFFICE 2003

[Anthony47]

Allora, i tuoi dati di partenza sono di questo tipo:
(Colonne A:F)

In colonna H ti crei l' elenco dei nominativi presenti in colonna B; puoi usare il Filtro avanzato, opzione Elenco univoco, copia in altra colonna.
Poi in I2 usi la formula

Codice: Seleziona tutto

=SOMMA.SE($B:$B;$H2;D:D)

Copia I2 verso destra e poi verso il basso per ottenere le somme di tutti i nominativi e tutte e tre le tipologie di valori.
Quando aggiungi nuovi nominativi in tabella di origine devi rigenerare l' elenco in colonna H.

Se invece lo fai con tabella pivot puoi ottenere un risultato come questo:

Per impostare la tabella pivot:
-selezioni le colonne A:F
-Menu /Dati /Rapporto tabella pivot
-Avanti, Avanti, premi Layout
-trascina Nome nell' area RIGA
-trascina Val.1 nell' area DATI e assicurati che sia visualizzato come "Somma di Val.1" (se No, doppioclick sulla voce attuale, scegli Somma dall' elenco che ti presenta, Ok)
-ripeti con Val.2 e Val.3 nell' area DATI
-conferma Nuovo foglio per la creazione della tabella, Fine

Per essere certi che la tabella contenga tutti i valori del momento, ti bastera' fare tasto dx all' interno della tabella e scegliere "Aggiorna".

Ciao

[bassotto1]

Grazie per l'aiuto Antony!

ho provato con la tabella pivot. Probabilmente sbaglio qualche cosa perchè trascinando Val.1, Val.2, Val.3 in area DATI la tabella me li propone in verticale e non in orizzontale come dal tuo esempio che, fra l'altro, è proprio quello che mi serve!!!

Grazie ancora.

[Anthony47]

E' solo una questione di formattazione della tabella pivot...

Visualizza la barra degli strumenti "Tabella pivot" (Menu /Visualizza /Barra degli strumenti). Seleziona quindi una cella della tabella; localizza nella barra degli strumenti l' icona "Formatta rapporto" (nel mio caso somiglia a una tabella con una saetta) e cliccala; scegli uno tra i formati che ti propone, e riprova finche' non ne trovi uno che ti soddisfa.

Ciao