Mucha gente usa Excel como un simple administrador de base de datos, ingresando información en diferentes filas de una hoja de trabajo. Mientras trabaja con sus tablas de datos, es posible que tenga la necesidad de invertir el orden de las filas en la tabla. Por lo tanto, si tiene una tabla con diez filas, las filas irían de diez a uno en lugar de uno a diez.

No hay una función intrínseca en Excel que le permita invertir datos de esta manera. Sin embargo, puede usar las capacidades de clasificación de Excel para lograr lo mismo siguiendo estos pasos generales:

  1. Inserte una nueva columna inmediatamente a la izquierda de su tabla de datos.

  2. En las celdas de la nueva columna, ingrese los números del 1 al número de filas que haya en su tabla.

  3. Seleccione las filas que componen su tabla de datos.

  4. Elija Ordenar en el menú Datos. Excel muestra el cuadro de diálogo Ordenar.

(Ver figura 1)

  1. En la lista desplegable Ordenar por, indique que desea ordenar por la columna recién creada.

  2. Haga clic en Descendente como tipo de ordenación.

  3. Haga clic en Aceptar. Excel reordena sus datos en el orden inverso al anterior.

Si tiene que cambiar una gran cantidad de datos a diario, seguir los pasos anteriores puede resultar bastante agotador. En este caso, es posible que desee crear una macro para que haga el trabajo por usted. La siguiente macro, FlipRows, hará el truco:

Sub FlipRows()

Dim vTop As Variant     Dim vEnd As Variant     Dim iStart As Integer     Dim iEnd As Integer         Application.ScreenUpdating = False         iStart = 1         iEnd = Selection.Rows.Count         Do While iStart < iEnd             vTop = Selection.Rows(iStart)

vEnd = Selection.Rows(iEnd)

Selection.Rows(iEnd) = vTop             Selection.Rows(iStart) = vEnd             iStart = iStart + 1             iEnd = iEnd - 1         Loop         Application.ScreenUpdating = True End Sub

Para utilizar esta macro, todo lo que necesita hacer es seleccionar las filas que desea voltear y ejecutarla. La macro no cambiará sus datos, aparte de voltear las filas. En otras palabras, no agregará ninguna columna de información.

Una característica interesante de este enfoque es que puede adaptarlo rápidamente para cambiar columnas de datos. Todo lo que necesita hacer es cambiar todas las apariciones de la palabra «Filas» a «Columnas». Por lo tanto, lo siguiente se convierte en la nueva macro:

Sub FlipColumns()

Dim vTop As Variant     Dim vEnd As Variant     Dim iStart As Integer     Dim iEnd As Integer         Application.ScreenUpdating = False         iStart = 1         iEnd = Selection.Columns.Count         Do While iStart < iEnd             vTop = Selection.Columns(iStart)

vEnd = Selection.Columns(iEnd)

Selection.Columns(iEnd) = vTop             Selection.Columns(iStart) = vEnd             iStart = iStart + 1             iEnd = iEnd - 1         Loop         Application.ScreenUpdating = True End Sub

Nuevamente, simplemente seleccione las columnas que desea voltear y luego ejecute la macro.

_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 (2653) se aplica a Microsoft Excel 97, 2000, 2002 y 2003.