Roger se pregunta si hay alguna forma de utilizar la función CONTAR.SI utilizando el color de fondo de la celda como criterio «si». Tiene un calendar y quiere poder contar el número de días que resalta en morado u otros colores.

La respuesta corta es que COUNTIF no se puede usar para verificar el color de fondo o cualquier formato; solo puede probar los valores. Si solo necesita calcular la cantidad de celdas violetas una o dos veces, puede usar la función Buscar y reemplazar de Excel para averiguarlo. Siga estos pasos:

  1. Seleccione las celdas que componen su calendario.

  2. Presione Ctrl + F. Excel muestra la pestaña Buscar del cuadro de diálogo Buscar y reemplazar.

  3. Haga clic en el botón Opciones, si está disponible. Excel expande el cuadro de diálogo. (Ver figura 1)

  4. Asegúrese de que el cuadro Buscar qué esté vacío.

  5. Haga clic en el botón Formato. Excel muestra el cuadro de diálogo Buscar formato.

(Ver figura 2)

  1. Haga clic en el botón Elegir formato de celda, en la parte inferior del cuadro de diálogo. El cuadro de diálogo Buscar formato desaparece y el puntero del mouse cambia a un signo más con un cuentagotas al lado.

  2. Haga clic en una celda que tenga el formato de las que desea encontrar. (En otras palabras, haga clic en una celda violeta). El puntero del mouse vuelve a la normalidad.

  3. Haga clic en Buscar todo. El cuadro de diálogo Buscar y reemplazar se expande para enumerar todas las celdas que coinciden con el formato, y hay un recuento de las celdas en la parte inferior del cuadro de diálogo.

  4. Haga clic en Cerrar para cerrar el cuadro de diálogo Buscar y reemplazar.

Por supuesto, estos pasos pueden resultar tediosos si desea contar más de uno o dos colores. O puede que desee el recuento para poder utilizarlo en un cálculo diferente de algún tipo. En estos casos, sería mejor crear una función definida por el usuario que examine las celdas y devuelva un recuento. Una de esas macros es CountColorIf:

Function CountColorIf(rSample As Range, rArea As Range) As Long     Dim rAreaCell As Range     Dim lMatchColor As Long     Dim lCounter As Long

lMatchColor = rSample.Interior.Color     For Each rAreaCell In rArea         If rAreaCell.Interior.Color = lMatchColor Then             lCounter = lCounter + 1         End If     Next rAreaCell     CountColorIf = lCounter End Function

Para usar la macro, todo lo que necesita hacer es proporcionar una celda que tenga el color de fondo que desea probar y el rango a probar. Por ejemplo, digamos que la celda A57 está formateada con el mismo color de fondo púrpura que usa en las celdas del calendario. Si el calendario está ubicado en las celdas A1: G6, entonces puede usar lo siguiente para obtener el recuento de celdas violetas:

=CountColorIf(A57, A1:G6)

Cabe señalar que si cambia el color en una celda de su calendario, entonces deberá hacer algo para forzar un nuevo cálculo de la hoja de trabajo. Parece que Excel no realiza un recálculo automático después de cambiar el color de fondo.

Por supuesto, existen muchas formas diferentes de abordar el problema y desarrollar funciones definidas por el usuario como CountColorIf. Aquí hay algunos otros sitios web que contienen información que puede ser útil en este sentido:

http://www.cpearson.com/excel/colors.aspx https://www.ozgrid.com/VBA/sum-count-cells-by-color.htm http://xldynamic.com/source/xld.ColourCounter.html

También hay algunos complementos de terceros disponibles que puede usar.

Uno de esos complementos sugeridos por los lectores es Kutools para Excel. Puedes encontrar más información sobre el complemento aquí:

https://www.extendoffice.com/product/kutools-for-excel.html

Una nota final: las ideas de esta sugerencia funcionan bien si trabaja con celdas que están explícitamente llenas de colores. No funcionarán con celdas coloreadas con formato condicional. Esa es una tetera completamente diferente para hervir, ya que el formato condicional realmente no le brinda nada a lo que pueda aferrarse fácilmente.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios ExcelTips), he preparado una página especial que incluye información útil.

link: / excelribbon-ExcelTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

ExcelTips es su fuente de formación rentable en Microsoft Excel.

Este consejo (11725) se aplica a Microsoft Excel 2007, 2010, 2013, 2016, 2019 y Excel en Office 365.