somma celle di un solo colore

Più che la somma delle celle si tratta di contare le celle che hanno un dato colore.

Prova questa fuzione che ha come argomenti un primo argomento che deve fare riferimento una cella il cui sfondo sia del colore di cui si desidera avere il conteggio e un secondo argomento che deve fare riferimento all'intervallo di celle per cui si vuole effettuare il conteggio di celle presenti con lo sfondo del colore della cella del primo argomento

'---

Function ContaColore(CellaColoreBase As Range, _

                     IntervalloCelleColori As Range)

  Application.Volatile

  Dim c As Range

  Dim IndexColoreBase As Long

  Dim Val As Long

  Application.Volatile

  IndexColoreBase = CellaColoreBase.Interior.Color

  Val = 0

  For Each c In IntervalloCelleColori

    If c.Interior.Color = IndexColoreBase Then

      Val = Val + 1

    End If

  Next c

  ContaColore = Val

End Function

'---

La funzione va inserita in una cella come una normale funzione.

Ad es. ipotizzando che la cella A1 è quella con lo sfondo giallo e che l'intervallo sia A1:A20 nella cella B1 puoi inserire =ContaColore(A1;A1:A20).

Provala e fai sapere se è quello che cerchi.

ciao