Stellar Blade Un'esclusiva PS5 che sta facendo discutere per l'eccessiva bellezza della protagonista. Vieni a parlarne su Award & Oscar!
 
Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

Cerca valore in matrice (elenca tutte le celle che lo contengono)

Ultimo Aggiornamento: 22/11/2019 17:27
Post: 103
Registrato il: 10/05/2005
Utente Junior
EXCEL 2016
OFFLINE
22/11/2019 12:56

Salve, ho un foglio di lavoro che gestisce i turni di lavoro stile calendario settimanale. Dato che ora gli operatori sono molti, il calendario risulta di difficile lettura quindi una volta riempito a mio uso e consumo, vorrei che ne venisse automaticamente creato un altro ordinato per nominativo in cui si potessero vedere chiaramente i turni in cui è inserito il nominativo.
Tipo... cerca questo nome e dammi i riferimenti delle coordinate di tutte le celle dove è presente.
Allego un file di esempio.
Grazie per l'attenzione
Renato
----------
Excel 2010
Post: 2.440
Registrato il: 06/04/2013
Utente Veteran
2010
OFFLINE
22/11/2019 13:26

con quella struttura???...mha

saluti



Domenico
Win 10 - Excel 2016
Post: 103
Registrato il: 10/05/2005
Utente Junior
EXCEL 2016
OFFLINE
22/11/2019 14:56

Ringrazio dodo per il prezioso aiuto....
Scherzi a parte magari la faccio semplice... anche se può sembrare astratto, è sempre una matrice rettangolare C3:M18 con la colonna c e la riga 3 che fanno da riferimento, non trovi? . La struttura si può anche modificare qualora fosse veramente complicato arrivare al risultato.
Grazie
----------
Excel 2010
Post: 4.273
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
OFFLINE
22/11/2019 14:58

Beh anch'io concordo con Domenico la struttura è quanto meno "deprecabile".

Comunque ho provato a scrivere questa function che ha due argomenti: nome e matrice di ricerca

vb
Function turni(nome As Range, rng As Range)
Dim cel As Range
Dim rig As Integer
Dim parola As String
For Each cel In rng
    If cel.Value = nome.Value Then
        rig = cel.Row
        parola = parola & "-" & Cells(3, cel.Column)
    End If
Next cel
turni = Cells(rig, "C").Value & parola
End Function


in P5 scrivi

text
=turni(O5;D5:F15)


e ricopi in basso.

Ovviamente per gli altri giorni devi cambiare la matrice di ricerca.

Non sono certo che funzioni bene.

Un nominativo nella stessa giornata può fare più turni?

Se si credo che il codice vada rivisto
[Modificato da alfrimpa 22/11/2019 15:18]

Alfredo
Post: 2.442
Registrato il: 06/04/2013
Utente Veteran
2010
OFFLINE
22/11/2019 17:27

Re:
Bierrepi, 22/11/2019 14.56:

... anche se può sembrare astratto, è sempre una matrice rettangolare C3:M18 con la colonna c e la riga 3 che fanno da riferimento, non trovi?...



Quella che tu chiami matrice contiene celle unite in col. C per non parlare dei giorni della settimana.

Con quella struttura, a fatica si otterrebbe qualcosa con vba (vedi macro Alfredo che saluto) ma, come lo stesso ha detto, per farla funzionare con tutti i giorni ce ne vuole.....

Io resto del mio parere e al tuo: "non trovi?..." rispondo con un "no" affettuoso 😉 e senza nessuna polemica naturalmente.

Un caro saluto




[Modificato da dodo47 22/11/2019 17:28]
Domenico
Win 10 - Excel 2016
Vota:
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Tag discussione
Discussioni Simili   [vedi tutte]
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 09:36. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com