estrarre dati da tabella excel 2013

[femon]

Salve a tutti,
ho una tabella excel dove nella colonna A ho una serie di nomi (per circa 200/300 righe)
Poi, nelle colonne successive (dalla B in poi) per ogni riga ho una serie di date (in qualche riga posso avere 2 o 3 date, per altre righe posso averne anche 20/25 dunque arrivare fino alla colonna AA, AB ecc.).
Premetto che la stessa data per qualche nome può essere nelle prime colonne mentre per altri nomi può essere in fondo al record.
Io dovrei estrarre un elenco con tutti i nomi che hanno nel loro record una data particolare ogni volta a mia scelta.
Ho provato con la tabella pivot ma non ci sono proprio riuscito.
Avete qualche suggerimento?
Forse mi serve una macro?
Grazie mille a chi mi può aiutare.
Federico.

[alfrimpa]

Ciao Federico

Allega un file di esempio con i dati ed il risultato desiderato inserito manualmente.

[femon]

ho problemi con l'invio dell'allegato.
più tardi ci riprovo.
Grazie

[Anthony47]

Per le istruzioni su come allegare un file:
viewtopic.php?f=26&t=103893&p=605487#p605487

[alfrimpa]

No Anthony il problema è che il sito di Filedropper da ieri sta facendo le bizze.

Federico prova ad usare Dropbox.

[femon]

https://www.dropbox.com/s/in13cavsv09u0 ... .xlsx?dl=0

Ciao grazie per l'aiuto. Ho allegato il file con dropbox.
Cerco di spiegare meglio la mia richiesta:
nel primo foglio "date" ho le varie date associate ai 21 nomi (anche se in realtà potrei anche avere circa 200/300 righe ed ogni riga corrisponde un nome). Nel foglio "elenco filtrato" scrivo la data che mi interessa (in questo caso 23 gennaio) e sotto o in qualche parte dovrebbe comparirmi l'elenco dei nomi che hanno quella data.
(Una sorta di "cerca verticale" ma allargato ad una intera tabella.)
Grazie ancora.
Federico.

[alfrimpa]

Ciao Federico

Ho dato uno sguardo veloce al file perché sono in partenza (e rientro domenica sera).

Ma non potresti usare in colonna V del primo foglio la funzione O?

Se scrivessi

=O(B2='ELENCO FILTRATO'!C1;C2='ELENCO FILTRATO'!C1;....U2='ELENCO FILTRATO'!C1)

Ti dovrebbe restituire VERO se la data prescelta è presente o FALSO se non c'è.

E poi con un filtro dati filtrare i VERO.

[Anthony47]

Alfredo, ma di nuovo in vacanza, vai?
Valido il tuo suggerimento di usare il filtro automatico per identificare nel primo foglio le righe che hanno sia il Nominativo che la data; magari lavorando in colonna B invece che in V, visto che non si sa dove finiscono le date.

Si puo' invece compilare il secondo foglio con questa macro:

Codice: Seleziona tutto

Sub myReport()
Dim myMatch, sDate As Date, I As Long, dSh As Worksheet, rSh As Worksheet, dRange As Range
'
Set dSh = Sheets("DATE")                '<<< Il foglio con le date
Set rSh = Sheets("ELENCO FILTRATO")     '<<< Il foglio del report
rSh.Select
sDate = rSh.Range("C1").Value
Set dRange = Application.Intersect(dSh.UsedRange, dSh.Range("A:A"))
For I = 5 To Cells(Rows.Count, 1).End(xlUp).Row
    myMatch = Application.Match(Cells(I, 1), dRange, 0)
    If Not IsError(myMatch) Then
        If Application.WorksheetFunction.CountIf(dSh.Rows(myMatch), sDate) > 0 Then
            dSh.Range(dSh.Cells(myMatch, 2), dSh.Cells(myMatch, Columns.Count).End(xlToLeft)).Copy Cells(I, 2)
        End If
    End If
Next I
End Sub


Modifica eventualmente le righe marcate <<<, come da commento.
Il file andra' poi salvato in formato macro enabled, cioe' ".xlsm"

Ciao

[femon]

Grazie Alfredo e grazie Anthony47 per la vostra disponibilità.

Ho provato in entrambi i modi e devo dire che quello di Alfredo funziona anche se poi devo lavorare sull'estetica... ma fa comunque il suo lavoro.
Quello di Anthony47 invece non mi funziona... ho copiato e salvato la macro ma quando la eseguo non mi fa niente... non so dove ho sbagliato.
l'ho provata sul file stesso in modo da non cambiare neanche i nomi ma... niente.

Se hai ancora tempo Anthony47 magari proviamo ad aggiustarla altrimenti va benissimo anche così.

Grazie millllllleeeeee.
Federico.

[alfrimpa]

Anthony non avevo il tempo per pensare ad una macro :- )

[femon]

Ok Anthony47
ora sono riuscito a far funzionare la macro, ma mi crea nel secondo foglio (elenco filtrato) una sorta di copia del primo foglio (date), ricopiandomi ancora tutte le date dei vari NOMI mentre io avrei bisogno nel foglio "elenco filtrato" solo della colonna NOME (senza tutte le altre date) che mi elenca solo i nomi che hanno la data ricercata ed inserita nella cella c1.
Non so se mi sono spiegato in modo chiaro....
Grazie per la pazienza.
Federico.

[Anthony47]

Eh, l'avevo fatta piu' complessa di quel che ti serviva...

Hai risolto con il filtro automatico? Come possibile semplificazione, la formula da usare potrebbe essere
Se in colonna V, in V2

Codice: Seleziona tutto

=Conta.Se(B2:U2;'ELENCO FILTRATO'!$C$1)

Se in colonna B (date spostate in colonna C), in B2

Codice: Seleziona tutto

=CONTA.SE(C2:IV2;'ELENCO FILTRATO'!$C$1)

Da copiare poi verso il basso

Ciao

[femon]

Perfetto Anthony47.
Tutto ok.
Ti ringrazio fesssss (in dialetto bresciano significa molto).

[Anthony47]

Allora: Prego fesssss