Condividi:        

Somma celle colorate

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Somma celle colorate

Postdi GApsyco » 25/11/15 17:49

Salve

ho un file excel di 365 colonne (un calendario): queste celle sono colorate manualmente in base a determitate condizioni (es. blu per progetto1, giallo per progetto2) e vanno da C2 a AG2

nella cella A2 avrei bisogno di avere la somma dei valori presente nelle celle gialle e nella colonna B2 la somma delle celle blu

Che formula devo inserire nelle celle A2 e B2?

Grazie in anticipo
GApsyco
Newbie
 
Post: 2
Iscritto il: 25/11/15 17:36

Sponsor
 

Re: Somma celle colorate

Postdi bismark » 25/11/15 18:41

buona sera

inserire in un modulo

Codice: Seleziona tutto
Function SumByColor(InRange As Range, WhatColorIndex As Integer, _
Optional OfText As Boolean = False) As Double
'
' This function return the SUM of the values of cells in
' InRange with a background color, or if OfText is True a
' font color, equal to WhatColorIndex.
'
Dim Rng As Range
Dim OK As Boolean

Application.Volatile True
For Each Rng In InRange.Cells
If OfText = True Then
OK = (Rng.Font.ColorIndex = WhatColorIndex)
Else
OK = (Rng.Interior.ColorIndex = WhatColorIndex)
End If
If OK And IsNumeric(Rng.Value) Then
SumByColor = SumByColor + Rng.Value
End If
Next Rng

End Function



io questa funzione l'ho utilizzata per le righe colorate di giallo non dovrebbe essere molto differente per quanto riguarda le colonne

buona serata
bismark
Utente Junior
 
Post: 54
Iscritto il: 08/07/15 15:03

Re: Somma celle colorate

Postdi Flash30005 » 26/11/15 00:36

Benvenuto nel Forum GApsyco
vorrei dire a tutti coloro che inseriscono risposte che presumono risolutive e che prelevano "altrove" e non sono macro di propria ideazione, se hanno testato ciò che pubblicano e se sono inerenti al quesito posto e in questo caso solo Gapsyco potrà dircelo...
Inoltre se la fonte proviene da altri siti è bene vengano enunciate le fonti come quella postata da Bismark che risale al 2007, è di Andrea Perotti, e la si trova QUI

buona serata a tutti
Flash
Win10 + Office 2010 Ita
"Fotografica" al servizio dell'immagine
Avatar utente
Flash30005
Moderatore
 
Post: 8517
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: Somma celle colorate

Postdi bismark » 26/11/15 09:44

Scusate non lo faccio più

tutto è dovuto ad un mio difetto di aver troppa fretta nell'aiutare gli altri come molti di voi hanno aiutato me..

in effetti come ho anche segnalato questa sub funziona per le righe e non per le colonne come richiesto, forse facevo meno danni se non la postavo

pazienza scusate ancora
bismark
Utente Junior
 
Post: 54
Iscritto il: 08/07/15 15:03

Re: Somma celle colorate

Postdi bismark » 26/11/15 12:11

non sono riuscito a trovare il codice del blu che richiedevi

http://www.filedropper.com/cartel1_1


spero almeno di aver centrato la tua richiesta
bismark
Utente Junior
 
Post: 54
Iscritto il: 08/07/15 15:03

Re: Somma celle colorate

Postdi bismark » 26/11/15 12:46

Trovato codice del blu sostituire il 3 con 23


ho utilizzato nella serie dei colori l'ottavo quadratino della serie sopra il tasto riempimento o altri colori

spero di essere stato chiaro

buon pomeriggio
bismark
Utente Junior
 
Post: 54
Iscritto il: 08/07/15 15:03

Re: Somma celle colorate

Postdi Anthony47 » 26/11/15 22:39

Trovo sempre un po' autolesionistico lavorare sul colore delle celle per valorizzare dei risultati; molto piu' logico e' partire dal'informazione "Progetto x" e usare questo dato per colorare la cella e per sommare i valori dei singoli progetti. Ad esempio
Immagine
upload immagini gratis
Le celle sono formattate tramite Formattazione condizionale, usando queste formule:
Per il verde, =C$3="Progetto3"
Per il giallo, =C$3="Progetto2"
Per il blu, =C$3="Progetto1"

In questo modo, quando inserisci la commessa (Progetto1, Progetto2, Progetto3, etc) le celle corrispondenti si coloreranno del colore prescelto.
Poi in B6 calcolerai la somma delle colonne marcate Progetto1 in riga 3, con la formula
Codice: Seleziona tutto
=MATR.SOMMA.PRODOTTO(--($C$3:$AG$3=A6);$C$2:$AG$2)
(in realta' si appoggia alla colonna A per determinare che cosa calcolare)
Copiando la formula verso il basso calcolerai la somma delle colonne che sono marcate come da intestazione nella cella a sinistra (A7, A8, ...)

In questo modo avrai sempre i colori e i riepiloghi aggiornati e allineati in real time, e non dovrai chiederti se la palette di colori che usi tu e' uguale a quella degli altri utenti del file.

NB: le formule fanno riferimento alle colonne C:AG che hai nominato; se invece la tua tabella si estende per 365 colonne allora devi adattare gli intervalli, rispettando la sintassi delle formule date.

Ciao a tutti
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Somma celle colorate

Postdi GApsyco » 27/11/15 08:49

Io vi ringrazio tutti.
la soluzione l'ho trovata grazie a Flash30005

e ringrazio anche bismark che si è sbattuto per trovarmi i colori :)
L'unico "problema" è che i codici vba dei colori che uso - quelli diciamo più opachi - non esistono. Userò i colori base.

Grazie di nuovo a tutti
GApsyco
Newbie
 
Post: 2
Iscritto il: 25/11/15 17:36

Re: Somma celle colorate

Postdi wallace&gromit » 27/11/15 09:01

non ho seguito tutta la discussione ma so che in VBA i colori possono essere definiti con il sistema RGB, quindi dovresti avere tutta la paletta a disposizione
Office2016 + 2019 su win11
Avatar utente
wallace&gromit
Utente Senior
 
Post: 2174
Iscritto il: 16/01/12 14:21

Re: Somma celle colorate

Postdi bismark » 27/11/15 12:29

Complimenti anthony47...

tutto quanto fa cultura

grazie anche del tuo esempio molto interessante

alla prossima
bismark
Utente Junior
 
Post: 54
Iscritto il: 08/07/15 15:03


Torna a Applicazioni Office Windows


Topic correlati a "Somma celle colorate":


Chi c’è in linea

Visitano il forum: Ricky0185 e 49 ospiti