¿Cómo transponer / convertir columnas y filas en una sola fila?
¿Cómo unir varias filas y columnas en una sola fila larga? Tal vez le parezca fácil, porque puede copiarlos uno por uno y unirlos en una fila manualmente. Pero llevará mucho tiempo y será tedioso si hay cientos de filas y columnas. Aquí os hablaré de algunos trucos rápidos para solucionarlo.
Transponer / convertir columnas y filas en una sola fila con fórmula
Transponer / convertir columnas y filas en una sola fila con código VBA
Transponer / convertir columnas y filas en una sola fila con Kutools para Excel
Transponer / convertir columnas y filas en una sola fila con fórmula
Suponiendo que tiene un rango de datos como muestra la siguiente captura de pantalla, puede convertir los datos del rango en una fila en una nueva hoja de trabajo con una fórmula larga.
Aplique la fórmula como esta:
1. En una nueva hoja de trabajo del libro activo, haga clic en la celda A1, copie y pegue esta fórmula: =OFFSET(Sheet1!$A$1,((ROW()-1)*5)+(FLOOR(COLUMN()-1,4)/4),(COLUMN()-1)-(FLOOR(COLUMN()-1,4)))
Note: Hoja1! $ A $ 1 es la hoja de trabajo y las referencias de rango que desea utilizar.
FILA () - 1) * 5 en la fórmula anterior, 5 representa el número de fila; y COLUMNA () - 1,4) / 4, la 4 representa el número de columna. Puede cambiarlos según sus necesidades.
2. Luego arrastre el controlador de relleno hacia la derecha hasta que aparezca el número 0. En este caso, todos los datos del rango se han transpuesto a una sola fila en una nueva hoja de trabajo. Ver captura de pantalla:
Transponer / convertir columnas y filas en una sola fila con código VBA
El siguiente código de VBA también puede ayudarlo a convertir un rango de datos en una fila.
1. Mantenga presionado el ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.
2. Hacer clic en recuadro > Móduloy pegue el siguiente código en el Módulo ventana.
Sub TransformOneRow()
'Updateby20131120
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Ranges to be transform :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Paste to (single cell):", xTitleId, Type:=8)
Application.ScreenUpdating = False
xRows = InputRng.Rows.Count
xCols = InputRng.Columns.Count
For i = 1 To xRows
InputRng.Rows(i).Copy OutRng
Set OutRng = OutRng.Offset(0, xCols + 0)
Next
Application.ScreenUpdating = True
End Sub
3. Luego presione F5 para ejecutar el código, se abre un cuadro de diálogo para que seleccione un rango de contenido que desea convertir en una fila y haga clic en Ok, otro cuadro de diálogo emergente es para que seleccione una sola celda para mostrar el resultado. Ver capturas de pantalla:
Luego haga clic Ok, el contenido del rango seleccionado se convierte en una fila. Ver captura de pantalla:
Note: En Establecer OutRng = OutRng.Offset (0, xCols + 0), tu puedes cambiar 0 a cualquier número para satisfacer sus necesidades.
Por ejemplo, si desea separar los resultados de acuerdo con las filas originales en una columna, puede cambiar Establecer OutRng = OutRng.Offset (0, xCols + 0) a Establecer OutRng = OutRng.Offset (0, xCols + 1), los resultados se muestran a continuación:
Transponer / convertir columnas y filas en una sola fila con Kutools para Excel
Parece que los dos métodos anteriores son algo difíciles para nosotros, los principiantes de Excel, aquí hablaré sobre una herramienta útil: Kutools for Excel para usted.
Kutools for Excel incluye más de 300 útiles herramientas de Excel. Prueba gratis sin límite en 30 días. Comprar ahora
Con la utilidad Transformar rango of Kutools for Excel, puede transformar rápidamente un rango en una sola fila, haga lo siguiente:
1. Seleccione el rango que desea transponer.
2. Hacer clic en Kutools > Convertidor de rango > Transformar rango, ver captura de pantalla:
3. En el Transformar rango cuadro de diálogo, seleccione Rango a una sola fila opción, ver captura de pantalla:
4. Luego haga clic OKy haga clic en una celda para colocar el resultado del cuadro emergente.
5. Hacer clic en OKy los datos del rango se han transpuesto a una sola fila. Ver capturas de pantalla:
Si desea obtener más información sobre esta función, visite Transformar rango.
Artículos relacionados:
¿Cómo cambiar de fila a columna en Excel?
¿Cómo transponer / convertir una sola columna a múltiples columnas en Excel?
¿Cómo transponer / convertir columnas y filas en una sola columna?
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- 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!