Hace algún tiempo publicamos dos artículos referente a inquietudes de miembros de nuestra comunidad Triple EEE, los cuales consisten en mostrar cómo sumar celdas por color en Excel, en aquellas ocasiones se explicó la solución a esta y otras inquietud a través de la implementación de una UDF (Función definida por el usuario), la cual desarrollamos a través de código VBA (Visual Basic for Applications) en donde se envía como parámetro la celda que contiene el color a buscar, el rango de celdas sobre el cual se deben buscar las celdas del color especifico en Excel y una condición para posteriormente sumar celdas por color en Excel de acuerdo a un tercer parámetro enviado, a continuación los accesos de los artículos anteriores
>>Artículo 1: Aprende a Sumar Celdas por Color en Excel
>> Artículo 2: Sumar celdas por color en Excel – Parte II
Se han recibido varios comentarios referentes a dos necesidades puntuales que no se cubren en el material pasado para Sumar celdas por color en Excel, las cuales son la suma de decimales, a pesar que en uno de los artículos se cubre esta necesidad la explicaremos nuevamente, otro punto más crítico, es cuando se aplica un color a una celda a través de la herramienta formato condicional en Excel, esta celda no se incluye en la suma de valores así el color corresponda al color en Excel buscado, por tal razón en el presente material se explica paso a paso a Sumar celdas por color en Excel con Formato Condicional y decimales.
En el material inicial de Sumar celdas por color en Excel se aplicó una función definida por el usuario (UDF), es decir, se creó la función a través de VBA, el método u orden para identificar el color de la celda en dicho material fue el siguiente:
celdaSeleccionada.Interior.ColorIndex
Para buscar un color en Excel que se haya aplicado a través de formato condicional o a través de formato como tabla esta orden no aplica, necesitamos aplicar la siguiente orden:
celdaSeleccionada.DisplayFormat.Interior.Color
La orden DisplayFormat.Interior.Color en VBA sirve para identificar el color que tiene una celda y que se haya aplicado con formato condicional en Excel o con formato tabla, de la misma forma, también sirve para el color de la celda que se haya aplicado sin formato condicional o con tablas.
¿Te esperabas esto?
La solución para el primer recurso de Sumar celdas por color en Excel se realizó con función definida por el usuario (UDF) donde se aplicó .Interior.ColorIndex, ahora aplicaremos .DisplayFormat.Interior.Color, solo que esta segunda orden no es aplicable o no funciona en funciones definida por el usuario, por eso necesitamos aplicar otra solución, ¿te esperabas esto?
En el vídeo de este recurso se explica cómo lo solucionamos paso a paso, también te invitamos a que apliques la filosofía A2E en el vídeo te enterarás de qué trata.
Temas explicados en el presente material:
- Sumar celdas por color en Excel
- Sumar celdas por color en Excel con Formato Condicional y decimales
- Función definida por el usuario (UDF)
- Suma con decimales en VBA
Para no perderte nada de lo que compartimos en las redes sociales, puedes seguirnos a través de los siguientes medios:
Youtube: https://goo.gl/FrswaC
Facebook: https://goo.gl/W5dIsa
Twitter: https://twitter.com/ee_excel
Instagram: https://goo.gl/xadGB5
Linkedin: https://goo.gl/Os1boH
A continuación el material de hoy:
Click >> Aquí << para descargar archivo Excel
1) Comunidad Triple EEE, Únete >> https://goo.gl/FrswaC
2) Suscríbete a este curso gratuito para aumentar tu productividad en Excel un 80% y obtén 4 regalos adicionales al suscribirte a este curso: http://goo.gl/zNqh0o
Artículos anteriores:
- Día 39: Formularios en Excel VBA: Eliminar datos de una base de datos en Excel #Reto40Excel 2016
- Día 38: Formularios en Excel VBA: Actualizar datos de una base de datos en Excel #Reto40Excel 2016
- Día 37: Formularios en Excel VBA: Consultar datos de una base de datos en Excel #Reto40Excel 2016
- Día 36 – Formularios en Excel VBA: Ingresar datos sin duplicados para hacer una base de datos en Excel #Reto40Excel 2016
- Día 35 – Actualizar y eliminar en Access desde Excel #Reto40Excel 2016
- Día 34 – ¿Cómo Insertar en Access desde Excel? #Reto40Excel 2016
- Día 33 – Consultar en Access desde Excel con varias condiciones SQL y limpiando datos #Reto40Excel 2016
- Día 32 – Consultar en Access desde Excel con condición SQL #Reto40Excel 2016
- Día 31 – Consultar Tabla Access desde Macro Excel VBA #Reto40Excel 2016
- Día 30 – Lista desplegable en Excel 2016 sin Duplicados #Reto40Excel 2016
Excelente macro, soluciona bastantes problemas y agiliza ek trabajo.
Felicitaciones
Hola Edgar, gracias por tu comentario, seguiremos trabajando para mejorar y compartir contenido de utilidad. Saludos
Excelentemente muchas Gracias
Hola Alejandro, gracias por comentar, saludos.
Gracias Ingeniero, Excel es y seguirá siendo futurista especialmente en la solución del amplio mundo de los números.
Hola Luis, claro que si Excel es una herramienta que nos brinda facilidad en nuestra cotidianidad, saludos.
Pingback: Búsqueda Implacable en Excel
Pingback: Búsqueda Implacable en Excel, Parte 2 de 4
Muchas gracias por el vídeo. Podrías decir de qué forma en vez de sumar se pueden CONTAR dichas celdas. Gracias de nuevo
Hola Pepe, gracias por comentar, una forma sería colocar una variable contador = contador + 1 Esa línea contará cada vez que haya un color del formato condicional, se debe reemplazar por la línea donde se suma. Saludes
Pingback: Búsqueda Implacable en Excel, Buscar en Access desde Excel
Lo he intentado a partir de vuestra respuesta pero no consigo que cuente las celdas de color, podríais poner, si sois tan amables, cómo sería entonces la macro.
Saludos y gracias
Hola Pepe, vamos a evaluar tu solicitud, para un futuro contenido. Saludos
Pingback: Los 10 tipos de errores más comunes en macros en Excel con VBA y que muy pocos saben cómo tratarlos, Runtime errors - Parte 1 de 2 - Especialistas En Excel
Pingback: Los 10 tipos de errores más comunes en macros en Excel con VBA y que muy pocos saben cómo tratarlos, Runtime errors - Parte 2 de 2 - Especialistas En Excel
Pingback: 15 Trucos y Tips de Tablas dinámicas en Excel que muy pocos conocen
Pingback: Trucos y Tips de Tablas dinámicas en Excel
Pingback: 30 Trucos y Tips de Excel que toda persona debe saber - Parte 1 - Especialistas En Excel
Pingback: 30 Trucos y Tips de Excel que toda persona debe saber – Parte 2 - Especialistas En Excel
Pingback: SUMAR.SI con Comodines en Excel
Pingback: Validación de datos en Excel, Mayúsculas y cantidad de caracteres
Pingback: 30 Trucos y Tips de Excel que toda persona debe saber Parte 1
Pingback: 15 Trucos y Tips de Tablas dinámicas en Excel
Pingback: 10 tipos de errores más comunes en macros en Excel con VBA
Pingback: Búsqueda Implacable en Excel – Sql Server desde Excel
Hola buenas tardes,
Muchas gracias por sus aportaciones y por los videos. Son muy detallados.
He probado a hacer la suma de celdas con formato condicional pero, incluso incluyendola dentro de una sub, el depurador me dice que el objeto no admite la propiedad o método. La variable colorReferencia la tengo definida como Long
colorReferencia = Cells(2, 69).DisplayFormat.Interior.color
¿Qué estoy haciendo mal?
Muchísimas gracias!!
Hola Berta, tendríamos que ver el resto del código para tener una mejor idea.
Acá la función completa
Sub SumarColorFormatoCondicional()
Dim CeldaReferencia As Range, RangoSeleccion As Range
Dim celdaSeleccionada As Range
Dim suma As Double
Dim cantidadColores As Integer
Dim colorRef As Long
Dim filaResultado As Long
Dim cont As Long
suma = 0
filaResultado = 16
Set RangoSeleccion = Range(Cells(14, 10))
cantidadColores = Cells(15, 10)
For cont = 1 To cantidadColores
colorRef = Cells(filaResultado + cont, 9).DisplayFormat.Interior.Color
For Each celdaSeleccionada In RangoSeleccion
If celdaSeleccionada.DisplayFormat.Interior.Color = colorRef Then
suma = suma + celdaSeleccionada.Value
End If
Next
Cells(filaResultado + cont, 10) = suma
suma = 0
Next cont
End Sub
Gracias por comentar, saludos
hola quisiera saber como aplicar el código de suma de colores por formato condicional, pero a varias hojas
Hola César, vamos a evaluar tu solicitud para un futuro contenido. Gracias por comentar, saludos