UDF: eXl_RecuentoColorValor Recuento por valor y color de celda en Excel

0

Código:


Function eXl_RecuentoColorValor(Celda·con·Color·a·Contar As Range, Rango As Range, Optional ContarValor As Boolean = False) As Double

Dim c As Range, R As Long

R = 0

For Each c In Rango

If c.Interior.Color = Celda·con·Color·a·Contar.Interior.Color Then

If ContarValor Then

If c.Value = Celda·con·Color·a·Contar.Value Then

R = R + 1

End If

Else

R = R + 1

End If

End If

Next c

eXl_RecuentoColorValor= R

End Function


👉 Como hacer que la UDF (User Defined Functions) esté disponible como una Función Nativa de Excel


⭐ Si te gustó, por favor regístrate en nuestra Lista de correo y Suscríbete a mi canal de YouTube para que estés siempre enterado de lo nuevo que publicamos.



Entradas que pueden interesarte

Sin comentarios

Etiquetas:
#aprendiendoexcel365, #josealcaldealias, #Excel, #funciones, #UDF, #Visual Basic, #VBA, #DAX, #Tips, #Basico, #Microsoft Excel, #Cursos Excel OnLine, #Aprende Excel, #Aprende Excel OnLine, #Excel 365, #Power Pivot, #Power BI, #Power Query, #Google Sheets, #Macros, #Código VBA, #Tutoriales Excel, #MTV, #Vbscript, #TypeScript, #Lenguaje M, #fórmulas, #funciones, #paso a paso, #funciones Excel, #libros, #tablas, #formatos, #hojas, #datos, #gráfico, #análisis de datos, #base de datos, #dashboards, #tablas dinámicas, #excel desde cero, #hoja de cálculo, #plantillas de Excel