Ordenar por color en Excel

Twittear este post  Compartir en Facebook

Hasta antes de Excel 2007, había la necesidad de ordenar nuestros datos, pero color. La labor no era nada fácil, por que había que programar una macro o una función para hacerla.

Ordenar por color en Excel 2003

  • Primeramente tenemos nuestra tabla con los datos, y una columna, por lo regular con color.
  • Entramos al editor de Visual Basic para aplicaciones con la combinación de telclas {Alt + F11}.
  • Insertamos un módulo nuevo en nuestro proyecto (archivo).
  • Pegamos el siguiente código:
Function ObtenerColor(celda As Range)
ObtenerColor = celda.Interior.ColorIndex
'celda es nuestra parámetro, que es un objeto Range
'Interior es una propiedad del objeto Range
'ColorIndex es una propiedad de Interior que nos devuelve el índice de color
End Function
  • En nuestro archivo de Excel, ponemos la fórmula =ObtenerColor(C4).
  • Y nos mostrará el índice de color que hayamos elegido.
  • Entramos en menú Datos > Ordenar, y ordenamos por la columa donde están los números de índice.

Ordenar por color en Excel 2007

Irónicamente en la versión 2007 y adelante, Microsoft escuchó a los usuarios e hizo esta labor más sencilla:

  • Elegimos nuestra tabla.
  • Nos vamos a la pestaña de Datos > Ordenar.
  • En el cuadro de diálogo que abre elegimos la columna a ordenar, Color de celda y Aceptar.

Imagen del ejemplo en Excel 2007

image

:: Descargar el ejemplo

You may also like...

3 Responses

  1. Luis says:

    La formula de concatenar me arroja error en la primera fila?, me podrias decir que estoy haciendo mal?

    Function EXCELeINFOCONCATENAR(rango As Range) As String
    Dim t As String
    Application.Volatile
    For Each celda In rango
    t = t & ” ” & celda.Value
    Next celda
    EXCELeINFOCONCATENAR = Trim(t)
    End Function
    End Sub

Leave a Reply

Your email address will not be published. Required fields are marked *

%d bloggers like this: