Funcion sumar por color

Función programada en vba para sumar celdas del mismo color. Muy útil cuando necesito ver las cosas gráficamente y al mismo tiempo poder sumar sus valores.

Aqui va la función :
Function SumarPorcolor(color As Range, Rangosuma As Range) As Double
Dim celda As Range
For Each celda In Rangosuma
If celda.Interior.ColorIndex = color.Cells(1, 1).Interior.ColorIndex Then
SumarPorcolor = SumarPorcolor + celda
End If
Next celda
Set celda = Nothing
End Function

[alexandervargas]

Entre todos los que vi, este es el único que sirve incluyendo decimales. Mil gracias

[rubenalonsofrayre]

Buenas tardes Excelente aportación, muchas gracias por compartir tus conocimientos, la macro funciona perfectamente, recibe un abrazo...

[adolfoarielalfonzovaldez]

Como se puede hacer para que actualice de forma automática en caso de editar los colores?

[jessigavillon]

puede ser que al cerrar y abrir el archivo desaparece la formula y hay que volver a cargarla cada vez que se abre el file?

[nelitaqui]

buen día,
como puedo contar contar ejemplo: tengo 1 celda combinada (de 3 celdas) en color amarillo, pero con la funcion contarcolor, me la cuenta como 3 celdas y necesito que se cuente como una sola. es posible?, y aparte que las que no son combinadas o solas se cuenten igualmente como una.


ojala me puedas ayudar.


saludos.

[IvanHernandez-hvor]

Hola, Gracias por tomarte el tiempo de compartir tus conocimientos. Implemente tu formula y funciona correctamente, solo un detalle en el cual espero que me ayudes. Cuando cambio el color de una celda no cambia en automático la suma total, sino que tengo que ir posicionarme en la celda de la sumatoria total y darle doble clik y luego enter para que actualice el resultado. Como se puede hacer en automatico????

[carlosbarrios]

hola amigo yo tengo este problema no me deja seguir cuando le tildo la primera celda y le pongo la coma me sale un aviso que dice HEMOS ENCONTRADO UN PROBLEMA EN LA FORMULA no me deja seguir por la coma
Tengo office 2013

[hectorazuara]

muchas gracias , muy útil,   no tienes una función pero que realice la actividad de sumar por color pero de texto o de formato de celda ?  gracias

[ilsegonzalez]

Buenas tardes, me aparece lo siguiente: ¿No intenta introducir una fórmula? cuando el primer caracter es un signo igual o un signo menos excel piensa que se trata de una formula..


¿Cómo puedo corregir esto?

[CarlosRodriguez-vfer]

Me aparece el error #Valor, tengo la versión 2011 para mac. Que puedo hacer? lo he copiado exactamente como lo pones y no me funciona.

[LauraGomez-ztsp]

hola, como estas? la función esta perfecta pero cuando voy a guardar no me deja actualizar porque me dice que no permite macros. me podrías ayudar por favor? cada vez que abro debo volver a colocar la función en el programador.

[pablocba]

Buen día, te comento que me funcionó, pero cuando cerré y volví a abrir el archivo me sale #Valor!, la formula linkea a otras planillas de excel, será por eso?

[sebastianamado]

Muchas Gracias por el aporte. Me surgió un problema al trabajar con eventos del tipo selection.change. Quería realizar una macro que permita evaluar el cambio de color y sumar la cantidad de celdas rojas dentro de un rango seleccionado.El problema es que en la macro que realice. Se requiere seleccionar otra celda cualquiera para que se evalué la suma al final de todo. Mi idea era que detecte el cambio de color y automáticamente muestre la suma mencionada en otra celda elegida. No se si me hice entender.Es posible esto? Desde ya muchas Gracias. Saludos

[gustavojaviergesualdo]

Buen dia capo, la formula me funciono, pero tengo un problema, yo lo uso para controlar unos cobros, empiezo elmes todo pintado de rojo y los q voy cobrando los cambio a verde, no me toma el cambio de color, ya cheque q en formulas este en avanzado, como pusiste por ahi. Gracias

[alexamakeup]

hola la formula al cerrar el programa no me queda guardada y se me borra todo me aparece que no se puede guardar en un libro sin macros

[ivanorozco]

amigo cuando creo la funcion, funciona perfecto, pero cuando guardo el documento habilitado para macro, y luego vuelvo abrir el documento, utilizo la funcion y me sale #¿NOMBRE?., reviso en f11 y esta guarda la funcion, agradeceria que me ayudaras.

[lucianaway]

Y para multiplicar?? Como lo hago ? Ayuda !

[danielcruzjimenez]

HOLA BUENAS TARDES, disculpen no encuentro la función que se hace mención que esta en comentarios, alguien me puede ayudar por favor??

[---oxpd]

Muy buen vídeo, sin embargo, no logro comprender ¿por que luego de realizar la operación, si se llega a cambiar el color de las celdas a valorar, el resultado de la suma no cambia automáticamente, sino que es necesario volver a ejecutar la formula de la celda contar por color?

¿ como se hace para que este resultado se actualice automáticamente como cualquier otra formula de excel?

[assurimbelmont]

HOLA ! HELP !
COMO CONTARIAS CUANTOS JUANES DE COLOR AMARILLO Y AZUL HAY.
EL NOMBRE ESTA EN LA COLUMA -A- Y EL COLOR EN LA COLUMNA -C-