La función eXl_INFRECUENTE es una función desarrollada en Visual Basic for Applications (VBA) para ser utilizada en Microsoft Excel para encontrar el valor menos frecuente en un rango de celdas especificado, el valor puede ser numérico, texto o alfanumérico. Si hay varios valores con la misma frecuencia mínima, la función eXl_INFRECUENTE devolverá todos los valores empatados separados por punto y coma (;) en caso de empate.
La sintaxis de la función eXl_INFRECUENTE es:
eXl_INFRECUENTE (Rango)
donde
Rango (obligatorio): Representa el rango de celdas en el que se desea encontrar el valor menos frecuente.
Código:
Function eXl_INFRECUENTE (Rango As Range) As Variant
Dim v As Object, c As Range, l As Variant, m As Long, n As String
Set v = CreateObject("Scripting.Dictionary")
For Each c In Rango
l = c.Value
If Not IsEmpty(l) Then
If v.Exists(l) Then
v(l) = v(l) + 1
Else
v.Add l, 1
End If
End If
Next c
m = Application.WorksheetFunction.Min(v.Items)
For Each l In v
If v(l) = m Then
If n = "" Then
n = l
Else
n = n & ";" & l
End If
End If
Next l
eXl_INFRECUENTE = n
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.
