Skip to main content

Kutools para Office — Una Suite. Cinco Herramientas. Haz Más.

¿Cómo clasificar datos en orden inverso en Excel?

Author Sun Last modified

En Excel, utilizando la fórmula típica =RANGO(celda, rango) la fórmula clasificará tus datos de tal manera que el valor más grande recibe un rango de 1, mientras que el valor más pequeño se le asigna el número de rango más bajo. Sin embargo, hay situaciones en las que puede ser necesario invertir esta lógica, dando al valor más pequeño el rango superior y al más grande el último rango, como se ilustra en la captura de pantalla a continuación. Esto puede ser particularmente útil cuando estás analizando datos donde los valores más bajos representan un mejor rendimiento, como tiempos de carrera, costos o recuentos de errores.
A screenshot showing data ranked in reverse order in Excel

Clasificación de datos en orden inverso | Código VBA: Asignar rangos inversos automáticamente


Clasificación de datos en orden inverso

Para realizar una clasificación inversa en Excel, puedes modificar ligeramente la fórmula estándar RANGO especificando un argumento adicional. Este enfoque te permite clasificar fácilmente los datos de menor a mayor, en lugar del orden predeterminado.

Selecciona una celda en blanco donde deseas que aparezca el resultado del rango inverso. Suponiendo que tu rango de datos está en las celdas B2 a B10, introduce la siguiente fórmula en la primera celda adyacente a tus datos (por ejemplo, en la celda C2):

=RANK(B2,$B$2:$B$10,1)

Después de ingresar la fórmula, presiona Enter. Para aplicar la fórmula a las demás celdas de tu columna, utiliza el controlador de relleno: posiciona el ratón sobre la esquina inferior derecha de la celda donde ingresaste la fórmula (C2), y cuando el cursor se convierta en un signo más, arrástralo hacia abajo para llenar las celdas restantes en el rango junto a tus datos (hasta C10 en este ejemplo). 
A screenshot of reverse rank formula applied in Excel

Si tu rango de datos es diferente, simplemente ajusta las referencias de las celdas dentro de la fórmula para que coincidan con tus datos reales. Recuerda que, si tienes valores duplicados, la función RANGO asignará el mismo rango a esos valores, y los rangos subsiguientes se omitirán (por ejemplo, si hay dos elementos empatados en segundo lugar, el siguiente rango será cuatro).

La clasificación inversa es especialmente valiosa cuando deseas destacar los valores más bajos o los tiempos más rápidos, y funciona bien en conjuntos de datos donde los empates son aceptables o esperados.


Código VBA: Asignar rangos inversos automáticamente

Para conjuntos de datos más grandes o escenarios donde tus datos se actualizan con frecuencia y necesitas una solución más automatizada, puedes usar código VBA para asignar rangos inversos de forma rápida y eficiente. Este método es ideal para usuarios familiarizados con pequeñas cantidades de programación y que buscan eliminar pasos manuales repetitivos.

1. Abre el editor de VBA haciendo clic en Herramientas de Desarrollo > Visual Basic. En la ventana de Visual Basic para Aplicaciones, haz clic en Insertar > Módulo y pega el siguiente código en el panel Módulo:

Sub AssignReverseRank()
    Dim dataRange As Range
    Dim outputRange As Range
    Dim i As Long
    Dim j As Long
    Dim temp As Variant
    Dim arr As Variant
    Dim sortedArr As Variant
    Dim rankArr() As Long
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set dataRange = Application.InputBox("Select the data range to rank (single column):", xTitleId, "", Type:=8)
    If dataRange Is Nothing Then Exit Sub
    
    Set outputRange = Application.InputBox("Select the first cell for output ranks:", xTitleId, "", Type:=8)
    If outputRange Is Nothing Then Exit Sub
    
    arr = dataRange.Value
    ReDim rankArr(1 To UBound(arr, 1), 1 To 1)
    sortedArr = arr
    
    ' Sort the array in ascending order
    For i = 1 To UBound(sortedArr, 1) - 1
        For j = i + 1 To UBound(sortedArr, 1)
            If sortedArr(i, 1) > sortedArr(j, 1) Then
                temp = sortedArr(i, 1)
                sortedArr(i, 1) = sortedArr(j, 1)
                sortedArr(j, 1) = temp
            End If
        Next j
    Next i
    
    ' Assign reverse ranks
    For i = 1 To UBound(arr, 1)
        For j = 1 To UBound(sortedArr, 1)
            If arr(i, 1) = sortedArr(j, 1) Then
                rankArr(i, 1) = j
                Exit For
            End If
        Next j
    Next i
    
    outputRange.Resize(UBound(rankArr, 1), 1).Value = rankArr
End Sub

2. Para ejecutar la macro, haz clic en el Run button botón Ejecutar o presiona F5. Se te pedirá que selecciones tu rango de datos (elige una sola columna que desees clasificar en orden inverso) y luego selecciona la primera celda donde deseas que se muestren los resultados de la clasificación. Haz clic en Aceptar después de cada selección.

Esta macro ordena tus datos en orden ascendente y asigna rangos inversos en consecuencia, colocando el valor más pequeño como rango 1. Es especialmente útil para clasificar miles de entradas de una vez, o para automatizar la clasificación en informes que se actualizan regularmente.

Al usar esta macro, asegúrate de que tus datos sean contiguos y contengan solo valores numéricos. Cualquier celda no numérica o en blanco puede dar lugar a una salida incorrecta, por lo que es mejor limpiar tus datos primero. Además, guardar tu libro antes de ejecutar macros es una buena precaución para evitar cambios no deseados.


Las mejores herramientas de productividad para Office

🤖 Kutools AI Aide: Revoluciona el análisis de datos basado en: Ejecución inteligente | Generar código | Crear fórmulas personalizadas | Analizar datos y generar gráficos | Invocar Funciones mejoradas
Funciones populares: Buscar, resaltar o identificar duplicados | Eliminar filas en blanco | Combinar columnas o celdas sin perder datos | Redondear...
Super BUSCARV: Búsqueda por varios criterios | Búsqueda por varios valores | Búsqueda en varias hojas | Coincidencia difusa....
Lista desplegable avanzada: Cree rápidamente una lista desplegable | Lista desplegable dependiente | Lista desplegable de selección múltiple....
Administrador de columnas: Agregar un número específico de columnas | Mover columnas | Alternar el estado de visibilidad de columnas ocultas | Comparar rangos y columnas...
Funciones destacadas: Cuadrícula de enfoque | Vista de diseño | Barra de fórmulas mejorada | Administrador de Libro de trabajo y Hoja de cálculo | Biblioteca de AutoTexto | Selector de fechas | Combinar Datos | Cifrar/Descifrar celdas | Enviar correo electrónico por lista | Super Filtro | Filtro especial (filtrar celdas con fuente en negrita/cursiva/tachado...)...
Los15 principales conjuntos de herramientas:12 herramientas de texto (Agregar texto, Eliminar caracteres específicos, ...) | Más de50 tipos de gráficos (Diagrama de Gantt, ...) | Más de40 fórmulas prácticas (Calcular edad basada en la fecha de nacimiento, ...) |19 herramientas de inserción (Insertar código QR, Insertar imagen desde ruta, ...) |12 herramientas de conversión (Convertir a palabras, Conversión de moneda, ...) |7 herramientas de combinar y dividir (Combinar filas avanzado, Dividir celdas, ...) ... y más
Utiliza Kutools en tu idioma preferido: admite inglés, español, alemán, francés, chino y más de40 idiomas adicionales.

Mejora tu dominio de Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...


Office Tab incorpora la interfaz de pestañas en Office y facilita mucho tu trabajo

  • Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abre y crea varios documentos en nuevas pestañas de la misma ventana, en lugar de hacerlo en ventanas separadas.
  • ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!

Todos los complementos de Kutools. Un solo instalador

El paquete Kutools for Office agrupa complementos para Excel, Word, Outlook y PowerPoint junto con Office Tab Pro, ideal para equipos que trabajan en varias aplicaciones de Office.

Excel Word Outlook Tabs PowerPoint
  • Suite todo en uno: complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
  • Un solo instalador, una licencia: configuración en minutos (compatible con MSI)
  • Mejor juntos: productividad optimizada en todas las aplicaciones de Office
  • Prueba completa de30 días: sin registro ni tarjeta de crédito
  • La mejor relación calidad-precio: ahorra en comparación con la compra individual de complementos