¿Cómo mover cada fila alterna a columnas en Excel?
Al trabajar con datos en Excel, especialmente con conjuntos de datos importados o no estructurados, es habitual encontrar nombres y sus valores asociados dispuestos verticalmente en una sola columna. Para hacer estos datos más legibles y útiles, suele ser necesario transformarlos a un formato tabular: mover cada fila alterna a columnas separadas.
Mover cada fila alterna a columna con fórmulas
Este es un método sencillo que utiliza la función INDICE de Excel para extraer filas alternas y mostrarlas como columnas. Si desea colocar los nombres en una columna y las edades en la siguiente, aplique las siguientes fórmulas:
1. En la celda C2, introduzca la siguiente fórmula en una celda vacía y arrástrela hacia abajo según sea necesario. Esta fórmula extrae el valor de cada segunda fila a partir de la fila 2 (nombres).
=INDEX($A:$A, (ROW(A1)-1)*2 + 2)
2. En la celda D2, introduzca la siguiente fórmula para extraer los datos alternativos y arrástrela hacia abajo para rellenar las celdas.
=INDEX($A:$A, (ROW(A1)-1)*2 + 3)
- INDEX($A:$A; ...): Busca en la columna A y devuelve el valor de una fila específica.
- FILA(A1): Devuelve el número de la fila actual. En A1 devuelve 1; al arrastrar la fórmula hacia abajo, se actualiza automáticamente a A2 (fila 2), A3 (fila 3), etc.
- (FILA(A1)-1)*2 + 2: Esta fórmula calcula el número de fila del que se extraerá el valor de la columna A.
Así, la fórmula extrae los valores de A2, A4, A6, A8…, es decir, de cada segunda fila a partir de la fila 2.
Mover cada fila alterna a columna con Kutools para Excel
Si prefiere una solución más intuitiva y sin fórmulas, Kutools para Excel le ofrece una función que permite transponer filas en columnas sin esfuerzo.
Tras instalar Kutools para Excel, siga estos pasos:
- Haga clic en Kutools > Rango > Transformar rango.
- En el cuadro de diálogo Transformar rango, configure las siguientes operaciones:
- Seleccione el rango que desea mover cada fila alterna
- Marque Columna única a rango en la sección Tipo de transformación,
- A continuación, marque **Valor fijo** y seleccione o introduzca **2** en la lista de la sección **Filas por registro**.
- Por último, haga clic en el botón Aceptar.
- En el siguiente cuadro emergente, seleccione una celda individual para mostrar el resultado; consulte la captura de pantalla:
- Haga clic en Aceptar y Kutools moverá automáticamente cada fila alterna a columnas independientes.
Mover cada fila alterna a columna con código VBA
Si realiza esta tarea con frecuencia, una macro de VBA puede automatizar el proceso, haciéndolo más rápido y eficiente.
1. Pulse simultáneamente las teclas Alt y F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. A continuación, haga clic en Insertar > Módulo para abrir una nueva ventana de módulo y, luego, copie el siguiente código VBA en ella.
VBA: Mover cada fila alterna a una columna.
Sub MoveRange()
'Updateby Extendoffice
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set InputRng = InputRng.Columns(1)
For i = 1 To InputRng.Rows.Count Step 2
OutRng.Resize(1, 2).Value = Array(InputRng.Cells(i, 1).Value, InputRng.Cells(i + 1, 1).Value)
Set OutRng = OutRng.Offset(1, 0)
Next
End Sub
3. Haga clic en el botón Ejecutar o pulse la tecla F5 y aparecerá un cuadro de diálogo para que seleccione el rango que desea mover. Consulte la captura de pantalla:
4. A continuación, haga clic en Aceptar para abrir otro cuadro de diálogo en el que podrá seleccionar la celda donde se mostrará el resultado. Consulte la captura de pantalla:
5. Haga clic en Aceptar y verá el resultado tal como se muestra a continuación:
🎯 Conclusión:
Cada método para mover cada fila alterna a columnas en Excel tiene sus propias ventajas, según sus necesidades:
- Método con fórmulas: Ideal para tareas rápidas y puntuales con conjuntos de datos pequeños. No requiere herramientas adicionales, pero puede ralentizarse con rangos grandes.
- Kutools para Excel: ideal para usuarios que buscan una solución sencilla y basada en clics, sin fórmulas complejas ni programación. Ofrece una interfaz intuitiva para realizar transformaciones rápidas.
- Macro VBA: la opción ideal para automatizar tareas repetitivas, especialmente con grandes volúmenes de datos. Requiere conocimientos básicos de programación, pero ofrece la máxima flexibilidad.
Elija el método que mejor se adapte a sus necesidades, tanto si trabaja con un conjunto pequeño de datos como si requiere una solución más escalable para conjuntos grandes. Si desea descubrir más consejos y trucos de Excel, nuestra web ofrece miles de tutoriales para ayudarle a dominar Excel.
Artículos relacionados:
Las mejores herramientas de productividad para Office
Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...
Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Active 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 dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!
Todos los complementos de Kutools en un solo instalador.
Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.
- Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un instalador, una licencia— configuración en minutos (compatible con MSI)
- Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
- Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
- La mejor relación calidad-precio— ahorre frente a la compra individual de complementos