Saltar al contenido principal

¿Cómo copiar y pegar filas o columnas en orden inverso en Excel?

A veces, es posible que deba copiar y pegar una lista de columnas o filas en orden inverso vertical u horizontalmente, como se muestra a continuación. ¿Cómo podría hacer frente a este trabajo de forma rápida y sencilla en Excel?

Copie y pegue una lista de columnas o filas en orden inverso con fórmula

Copie y pegue un rango de columnas o filas en orden inverso con el código VBA

Copie y pegue un rango de columnas o filas en orden inverso con una característica increíble


Copie y pegue una lista de columnas o filas en orden inverso con fórmula

Copie y pegue una lista de columnas en orden inverso verticalmente

Si desea invertir una lista de celdas de columna, puede aplicar la siguiente fórmula:

Ingrese o copie la siguiente fórmula en una celda en blanco donde desea invertir el orden de las columnas:

=OFFSET($A$15,-(ROW(A1)-1),0)

Note: En la fórmula anterior, A1 es la primera celda de la columna, y A15 es la última celda de la columna.

Luego, arrastre el controlador de relleno hacia las celdas para extraer los valores de celda en orden inverso como se muestra a continuación:


Copie y pegue una lista de filas en orden inverso horizontalmente

Para copiar y pegar una lista de filas en orden inverso, utilice la siguiente fórmula:

Ingrese o copie esta fórmula en una celda en blanco:

=OFFSET($A$1,,COUNTA(1:1)-COLUMN(A1),)

Note: En la fórmula anterior, A1 es la primera celda de la fila, y 1:1 es el número de fila que ubicaron sus datos. Si sus datos están en la fila 10, debe cambiarlos a 10:10.

Y luego, arrastre el controlador de relleno hacia las celdas a las que desea aplicar esta fórmula hasta que se extraigan todos los valores y obtendrá todos los valores invertidos horizontalmente, vea la captura de pantalla:


Copie y pegue un rango de columnas o filas en orden inverso con el código VBA

Si necesita copiar y pegar un rango de columnas o filas en orden inverso, aquí, presentaré algunos códigos VBA para resolverlo rápida y fácilmente. Siga los siguientes pasos:

Copie y pegue una lista de columnas en orden inverso verticalmente

1. Primero, debe copiar y pegar sus datos en un nuevo lugar, y luego, mantenga presionada la tecla ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.

2. Hacer clic recuadro > Móduloy pegue el siguiente código en el Módulo Ventana.

Código VBA: copie y pegue un rango de celdas en orden inverso verticalmente

Sub Flipvertically()
'updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim Arr As Variant
Dim i As Integer, j As Integer, k As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Arr = WorkRng.Formula
For j = 1 To UBound(Arr, 2)
    k = UBound(Arr, 1)
    For i = 1 To UBound(Arr, 1) / 2
        xTemp = Arr(i, j)
        Arr(i, j) = Arr(k, j)
        Arr(k, j) = xTemp
        k = k - 1
    Next
Next
WorkRng.Formula = Arr
End Sub

3. Entonces presione F5 para ejecutar este código, y aparece un cuadro emergente para recordarle que seleccione el rango de datos que desea invertir verticalmente, vea la captura de pantalla:

4. Y luego, haga clic en OK botón, y el rango de datos se ha invertido verticalmente como se muestra a continuación:


Copie y pegue un rango de celdas en orden inverso horizontalmente

Para invertir el rango de datos en orden horizontal, aplique el siguiente código VBA:

Código VBA: copie y pegue un rango de celdas en orden inverso horizontalmente

Sub Fliphorizontally()
'updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim Arr As Variant
Dim i As Integer, j As Integer, k As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Arr = WorkRng.Formula
For i = 1 To UBound(Arr, 1)
    k = UBound(Arr, 2)
    For j = 1 To UBound(Arr, 2) / 2
        xTemp = Arr(i, j)
        Arr(i, j) = Arr(i, k)
        Arr(i, k) = xTemp
        k = k - 1
    Next
Next
WorkRng.Formula = Arr
End Sub

Después de ejecutar este código, obtendrá las siguientes capturas de pantalla que necesite:


Copie y pegue un rango de columnas o filas en orden inverso con una característica increíble

Si no está familiarizado con las fórmulas anteriores y los códigos VBA, aquí le recomendaré una herramienta fácil:Kutools for Excel, Con su Voltear rango vertical y Voltear rango horizontal características, puede invertir el rango de celdas vertical y horizontalmente con un solo clic.

Consejos:Para aplicar esto Voltear rango vertical y Voltear rango horizontal características, en primer lugar, debe descargar el Kutools for Excely, a continuación, aplique la función de forma rápida y sencilla.

Después de instalar Kutools for Excel, haz lo siguiente:

Copie y pegue un rango de celdas en orden inverso horizontalmente

1. Seleccione el rango de celdas y luego haga clic en Kutools > Gama de Colores > Voltear rango vertical > Todo (solo valores invertidos), ver captura de pantalla:

2. Y luego, el rango de valores de celda se ha invertido verticalmente a la vez, vea las capturas de pantalla:


Copie y pegue un rango de celdas en orden inverso horizontalmente

1. Seleccione el rango de celdas y luego haga clic en Kutools > Gama de Colores > Voltear rango horizontal > Todo (solo valores invertidos), ver captura de pantalla:

2. Y luego, todos los valores de celda en la selección se han invertido horizontalmente de inmediato, vea las capturas de pantalla:

¡Haga clic para descargar Kutools para Excel y prueba gratuita ahora!


Artículos más relativos de copiar y pegar:

  • Copie y pegue celdas combinadas en celdas individuales en Excel
  • Normalmente, cuando copia las celdas combinadas y las pega en otras celdas, las celdas combinadas se pegarán directamente. Pero, desea pegar estas celdas combinadas en celdas individuales como se muestra en la siguiente captura de pantalla, para que pueda manejar los datos como lo necesite. En este artículo, hablaré sobre cómo copiar y pegar celdas combinadas en celdas individuales.
  • Copie una columna y pegue solo los registros únicos en Excel
  • Para una columna con muchos duplicados, es posible que deba obtener una copia de esta lista con solo los valores únicos. ¿Cómo puedes hacer para lograrlo? En este artículo, proporcionamos dos métodos para pegar solo los registros únicos de una lista de columnas en Excel.
  • Copiar datos de hoja protegida
  • Supongamos que recibe un archivo Excel de otra persona que con las hojas de trabajo están protegidas por el usuario, ahora desea copiar y pegar los datos sin procesar en otro libro nuevo. Pero los datos en la hoja protegida no se pueden seleccionar ni copiar porque el usuario desmarca las opciones Seleccionar celdas bloqueadas y Seleccionar celdas desbloqueadas al proteger la hoja de trabajo.
  • Copiar datos a otra hoja de trabajo con filtro avanzado en Excel
  • Normalmente, podemos aplicar rápidamente la función de Filtro avanzado para extraer datos de los datos sin procesar en la misma hoja de trabajo. Pero, a veces, cuando intenta copiar el resultado filtrado a otra hoja de trabajo, recibirá el siguiente mensaje de advertencia. En este caso, ¿cómo podría hacer frente a esta tarea en Excel?

  • Barra de súper fórmula (edite fácilmente varias líneas de texto y fórmulas); Diseño de lectura (leer y editar fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas y conservación de datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir celdas duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Varias celdas sin cambiar la referencia de la fórmula; Crear referencias automáticamente a varias hojas; Insertar viñetas, Casillas de verificación y más ...
  • Fórmulas favoritas e insertar rápidamente, Rangos, gráficos e imágenes; Cifrar celdas con contraseña; Crear lista de distribución y enviar correos electrónicos ...
  • Extraer texto, Agregar texto, Eliminar por posición, Quitar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtros a otras hojas); Orden avanzado por mes / semana / día, frecuencia y más; Filtro especial en negrita, cursiva ...
  • Combinar libros y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes de xls, xlsx y PDF...
  • Agrupación de tablas dinámicas por número de semana, día de la semana y más ... Mostrar celdas bloqueadas y desbloqueadas por diferentes colores; Resalte las celdas que tienen fórmula / nombre...
pestaña kte 201905
  • Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!
officetab parte inferior
Comments (3)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
OFFSET($A$15,-(ROW(A1)-1),0) and OFFSET($A$1,,COUNTA(1:1)-COLUMN(A1),) do not work when the data is not located in the first row or column.
these functions seem to work better:

Mirror row:
suppose the data is located in G11:K11
OFFSET($G$11,,COUNTA(11:11)-COUNTA($G$11:G11),) ........ OFFSET($G$11,,COUNTA(11:11)-COUNTA($G$11:K11),)

Mirror column:
suppose the data is located in E22:E26
OFFSET($E$22,ROW($E$26)-ROW(E22),0) ........ OFFSET($E$22,ROW($E$26)-ROW(E26),0)
Rated 5 out of 5
This comment was minimized by the moderator on the site
Hello Nasrin,

How are you. I tried your formulas and they work perfectly. Thanks for your share. We will take your advice. Have a great day.

Sincerely,
Mandy
This comment was minimized by the moderator on the site
Me funcionó la opción del código VBA. Muchas gracias!!!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations