Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Somma numeri dello stesso colore

873 views
Skip to first unread message

mario3693

unread,
Mar 2, 2010, 5:36:01 PM3/2/10
to
Buona serata a tutti e scusate il disturbo, come posso, con excel 2007
sommare solo i numeri di uno stesso colore?
Grazie

Mauro Gamberini

unread,
Mar 3, 2010, 5:23:17 AM3/3/10
to
> Buona serata a tutti e scusate il disturbo, come posso, con excel 2007
> sommare solo i numeri di uno stesso colore?
>

Puoi, ad esempio, mettere il filtro alla tabella,
filtrare i dati *per colore* e chiedere
una somma automatica.
Verr� messa la funzione SUBTOTALE()
che dar� appunto il subtotale in base al
colore filtrato.

--
---------------------------
Mauro Gamberini
Microsoft MVP - Excel
http://www.riolab.org/
http://www.maurogsc.eu/
http://social.microsoft.com/Forums/it-IT/excelit/threads

__________ Informazioni da ESET NOD32 Antivirus, versione del database delle firme digitali 4910 (20100302) __________

Il messaggio � stato controllato da ESET NOD32 Antivirus.

www.nod32.it


Mario

unread,
Mar 8, 2010, 9:26:01 AM3/8/10
to
"Mauro Gamberini" ha scritto:

> > Buona serata a tutti e scusate il disturbo, come posso, con excel 2007
> > sommare solo i numeri di uno stesso colore?
> >
>
> Puoi, ad esempio, mettere il filtro alla tabella,
> filtrare i dati *per colore* e chiedere
> una somma automatica.

> Verrà messa la funzione SUBTOTALE()
> che darà appunto il subtotale in base al
> colore filtrato.

....scusa, mi spiego meglio:
A B C D E
1) 205 8,08 17,83 26,91 234,19
2) 206 8,08 17,83 26,91 208,28
3) 207 8,08 17,83 26,91 182,37
4) 208 8,08 17,83 26,91 156,46
5) 209 8,08 17,83 26,91 130,55
6) 210 8,08 17,83 26,91 104,64
7) Totale
il numero in A3 è rosso il numero in B1 è rosso il numero in D6 è rosso e il
numero in E1 è rosso, come posso fare per sommare tutti i numeri rossi ed
avere il totale in B7? Grazie

>
> --
> ---------------------------
> Mauro Gamberini
> Microsoft MVP - Excel
> http://www.riolab.org/
> http://www.maurogsc.eu/
> http://social.microsoft.com/Forums/it-IT/excelit/threads
>
>
>
> __________ Informazioni da ESET NOD32 Antivirus, versione del database delle firme digitali 4910 (20100302) __________
>

> Il messaggio è stato controllato da ESET NOD32 Antivirus.
>
> www.nod32.it
>
>
>
>
> .
>

Mauro Gamberini

unread,
Mar 8, 2010, 10:54:52 AM3/8/10
to
> ....scusa, mi spiego meglio:
> A B C D E
> 1) 205 8,08 17,83 26,91 234,19
> 2) 206 8,08 17,83 26,91 208,28
> 3) 207 8,08 17,83 26,91 182,37
> 4) 208 8,08 17,83 26,91 156,46
> 5) 209 8,08 17,83 26,91 130,55
> 6) 210 8,08 17,83 26,91 104,64
> 7) Totale
> il numero in A3 è rosso il numero in B1 è rosso il numero in D6 è rosso e
> il
> numero in E1 è rosso, come posso fare per sommare tutti i numeri rossi ed
> avere il totale in B7? Grazie
>

Sono rossi per via di una formattazione
condizionale? Nel qual caso potresti
utilizzare SOMMA.SE() più o meno così:

=SOMMA.SE(A1:D10;"<0";A1:D10)

dove sommo i valori inferiori a 0 e che
precedentemente ho formattato a colore
rosso tramite un'eguale condizione nella
formattazione condizionale.


Se invece il colore rosso non è inserito
tramite formattazione condizionale,
posso utilizzare il vb ed una semplice
function tipo:

Public Function f( _
ByVal v As Variant, _
ByVal lCol As Long) _
As Double

'dichiaro le variabili
Dim c As Range
Dim d As Double
Application.Volatile
d = 0
For Each c In v
If c.Font.ColorIndex = lCol Then
d = d + c.Value
End If
Next

f = d

'Set a Nothing delle variabili oggetto
Set c = Nothing

End Function

Da richiamare così:

=f(A1:D10,3)

Dai un'occhiatina anche qui:

http://www.google.it/#hl=it&source=hp&q=excel+sommare+numeri+colore+uguale&meta=&rlz=1R2ADRA_itIT368&aq=f&oq=excel+sommare+numeri+colore+uguale&fp=10b7be9cdf56ba04
http://groups.google.it/groups?hl=it&source=hp&q=excel%20sommare%20numeri%20colore%20uguale&rlz=1R2ADRA_itIT368&um=1&ie=UTF-8&sa=N&tab=wg

Grazie per l'attenzione.


__________ Informazioni da ESET NOD32 Antivirus, versione del database delle firme digitali 4925 (20100308) __________

Il messaggio � stato controllato da ESET NOD32 Antivirus.

www.nod32.it

0 new messages