conta colore e conta nome

[marco_budinPartecipante marco_budin Karma: 2 pts]

buongiorno a tutti,

devo eseguire un conteggio delle varie persone che eseguono dei turni. In Mese (colonna C) trovate le persone che lavorano. Mentre accanto vi sono i giorni del mese (in questo caso di Dicembre).

ho trovato sui vari forum un codice e un codice contacolore. Quindi sono in grado di contare quante volte appare il colore di quella cella.

Io però ho il problema, di dover contare sia il colore della cella che il "nome specifico nella cella colorata." nella tabella Statistiche.

Faccio un esempio: "CAS" lavora in totale 6 volte nel mese. ma solo 2 volte nel weekend "colorato sfondo grigino". cioè il calcolare quante volte appare "CAS" nel range("C14:31")  è =CONTA.SE(MESE!C14:C44;"CAS"), ma riconoscere quando CAS si trova nella cella "grigina" che rappresenta i weekend?

Chiaramente come si vede dalla tabella statistica, devo poterlo fare anche per le altre persone.

 

spero che qualcuno potrà darmi una mano, e vi ringrazio anticipatamente come sempre per il vostro prezioso aiuto!

saluti e a presto

Marco

 

Allegati:

You must be logged in to view attached files.

[Luca73Partecipante Luca73 Karma: 58 pts]

Ciao Se

devi solo contaggiare Savbati e domeniche non farei una verifica sul colore ma sul giorno stesso.

Ti potrebbe andare bene una soluzione così (nel caso una formula potrebbe essere più che sufficiente senza fare macro?

Fammi sapere

Ciao

Luca

 

 

 

[marco_budinPartecipante marco_budin Karma: 2 pts]

ciao Luca 73,

grazie per la tua pronta risposta: potrebbe essere una soluzione, e come si potrebbe fare?

 

io ho trovato in internet anche questa formula, ma purtroppo funziona solo se inserisco un numero e non u testo.. come si potrebbe adeguare la formula per far inserire un testo e non un numero?

Function ContacoloreIF(CellColor As Range, Content As Double, CountRange As Range)
Application.Volatile
Dim ICol As Integer
Dim TCell As Range
ICol = CellColor.Interior.ColorIndex
For Each TCell In CountRange
If ICol = TCell.Interior.ColorIndex And TCell.Value > Content Then
ContacoloreIF = ContacoloreIF + 1
End If
Next TCell
End Function

 

come sempre vi ringrazio per il vostro prezioso aiuto!

saluti e a presto

Marco

[Luca73Partecipante Luca73 Karma: 58 pts]

La formula qui sotto preparata per CAS 

conta quante volte compare CAS in sabati e domeniche

=MATR.SOMMA.PRODOTTO(--(GIORNO.SETTIMANA(MESE!$B$14:$B$44;2 )>5);--(MESE!$C$14:$C$44=Statistiche!B7))

Basta poi copiarla per gli altri nomi

Ciao

Luca

[marco_budinPartecipante marco_budin Karma: 2 pts]

ciao Luca! grazie mille della tua formula!! funziona perfettamente!

ti ringrazio e ti auguro una buona giornata

saluti e alla prossima

Marco

[Autore]

Articoli