Contare occorrenze eliminando i duplicati - Prospetto dati

[ricky53]

Ho una tabella così costituita:

colonna "A" cognome
colonna "B" data
colonna "C" attività svolta
altre dati non rilevanti

Informazioni:
lo stesso cognome nello stesso giorno può svolgere attività diverse

A me occorre sapere:
1. per cognome e per data se una persona ha svolto almeno un'attività
2. per cognome quante attività ha svolto

ATTENZIONE: se nello stesso giorno la stessa persona ha svolto più di 1 attività si assume che ha svolto 1 sola attività !!!

Dati:
C1 - 1 gen - Att1
C1 - 1 gen - Att2
C1 - 1 gen - Att3
C1 - 3 gen - Att1
C1 - 3 gen - Att4
C1 - 4 gen - Att5

C2 - 2 gen - Att1
C2 - 2 gen - Att3
C2 - 3 gen - Att3
C2 - 3 gen - Att4
C2 - 3 gen - Att5
C2 - 3 gen - Att7

Devo ottenere due prospetti:

Prospetto 1: (cognome - data)
C1 - 1 gen
C1 - 3 gen
C1 - 4 gen
C2 - 2 gen
C2 - 3 gen


Prospetto 2: (cognome - numero attività svolte)
C1 - 3
C2 - 2

Grazie

[ricky53]

Ciao,
in attesa di una vostra risposta, ed avendo un po' di tempo, ho scritto alcune righe di codice ed ho risolto.
Non penso siano utili e quindi non le riporto.
Se dovessero interessare a qualcuno le riporterò.

Avrei preferito utilizzare una formula
Spero in una vostra soluzione

Grazie

[wallace&gromit]

Non si risolveva con due tabelle pivot?

[Anthony47]

Se avessi XL2021 o 365 sarebbe stato abbastanza facile anche con formule; es l'elenco Cognomi /Date:

Codice: Seleziona tutto

=LET(uTab;UNICI(A2:A20&"|"&TESTO(B2:B20;" gg-mmm"));DIVIDI.TESTO(uTab;"|"))


Con versioni che non hanno queste "nuove" funzioni diventa un insieme di formule a matrici da mal di testa, quindi benissimo vba, oppure una Funzione utente sempre in vba.

[ricky53]

Grazie, avevo quasi la certezza che la soluzione con formule fosse da mal di testa...
Essendo io in vecchio programmatore mi sono buttato sul codice VBA.

Volevo comunque vedere se i guru delle formule potevano non farmi venire il mal di testa.

Al momento ho fatto proprio una macro che viene richiamata all'attivazione del foglio delle statistiche ed elabora tutti i dati e scrive sul foglio statistiche quello che occorre.

Grazie come sempre

[ricky53]

Ciao Anthony,
Ritorno al mio quesito per curiosità nell'utilizzo delle funzioni che mi hai proposto.

Su un PC con installato Office 2021 ho voluto provare la tua soluzione:

Se avessi XL2021 o 365 sarebbe stato abbastanza facile anche con formule; es l'elenco Cognomi /Date:

Codice: Seleziona tutto

=LET(uTab;UNICI(A2:A20&"|"&TESTO(B2:B20;" gg-mmm"));DIVIDI.TESTO(uTab;"|"))


Il 2021 riconosce LET, UNICI, ma non esiste la funzione DIVIDI.TESTO. (probabilmente è della versione 365)
Una funzione alternativa o ....?

Grazie

[Anthony47]

Gia'... quella funzione (insieme a tante altre) e' stata rilasciata nel 2022 (https://techcommunity.microsoft.com/t5/ ... p/3186066)

Si potrebbe usare Filtro.Xml...
Ad esempio se in A2 hai la stringa "uno due tre quattro cinque" puoi estrarre le stringhe usando " " (spazio) come separatore con la formula

Codice: Seleziona tutto

=MATR.TRASPOSTA(FILTRO.XML("<x><y>"&SOSTITUISCI(A2;" ";"</y><y>")&"</y></x>";"//y"))


(senza Matr.Trasposta il risultato viene presentato in verticale)

Ma Filtro.Xml non puo' essere usata con matrici, quindi va fatto riga per riga, ma allora si perde il vantaggio della funzione UNICI; a meno che non si crei prima una colonna di "unici" con la formula

Codice: Seleziona tutto

=LET(uTab;UNICI(A2:A20&"|"&TESTO(B2:B20;" gg-mmm"));uTab)

(ma qui l'uso di LET e' praticamente inutile)
E poi si usi la formula con Filtro.Xml abbozzata prima per splittare su piu' colonne

[Anthony47]

Una piccola semplificazione usando la funzione LAMBDA:
1) tramite la formula detta prima crei la colonna di appoggio con gli "unici Cognome-Data"

2) ti crei una funzione che fa lo split del testo:
-tramite Menu /Formule /Gestione nomi crei un "nuovo nome" cui assegni il nome SPLITTER
-in Riferito a scrivi la formula

Codice: Seleziona tutto

=LAMBDA(Text;Sep;MATR.TRASPOSTA(FILTRO.XML("<x><y>"&SOSTITUISCI(Text;Sep;"</y><y>")&"</y></x>";"//y")))

Ora su Excel hai la tua funzione SPLITTER che come parametri richiede il Testo e il Separatore.

Quindi se l'elenco degli unici e' in E2, in F2 uoi usare

Codice: Seleziona tutto

=SPLITTER(E2;"|")

Da copiare poi verso il basso

[ricky53]

Ciao,
grazie.
Interessante soluzione.
Oggi la provo e ti aggiorno.

[ricky53]

Non si risolveva con due tabelle pivot?

Scusa vedo solo ora la tua risposta.
non avevo provato prima di scrivere sul forum.
Non si ottiene quello che occorre

Grazie comunque

[ricky53]

Grazie Anthony,

AGGIORNAMENTO:
per semplicità di utilizzo da parte degli utenti che sono poco smart con excel, sono obbligato ad utilizzare la macro iniziale con dei controlli specifici della questione.

Grazie ancora

Alla prossima