¿Cómo combinar varias columnas en una lista en Excel?

Para combinar o fusionar varias columnas en una lista larga, normalmente puedes copiar y pegar los datos de las columnas uno por uno en la columna especificada. Sin embargo, aquí puedo presentarte algunos trucos rápidos para resolver esta tarea en Excel.

Combinar múltiples columnas en una lista con código VBA

Combinar múltiples columnas en una lista con Kutools para Excel

Combinar múltiples columnas en una lista con código VBA

Sin necesidad de repetir la copia y pegado de los datos de las columnas, el siguiente código VBA puede ayudarte a realizar este trabajo de forma rápida y sencilla.

1. Mantén presionadas las teclas Alt + F11 en Excel, y se abrirá la ventana de Microsoft Visual Basic para Aplicaciones.

2. Haz clic en Insertar > Módulo, y pega la siguiente macro en la Ventana del Módulo.

Código VBA: Combinar o fusionar múltiples columnas en una lista

Sub CombineColumns1()
'updateby Extendoffice
    Dim xRng As Range
    Dim i As Integer
    Dim xLastRow As Integer
    Dim xTxt As String
    On Error Resume Next
    xTxt = Application.ActiveWindow.RangeSelection.Address
    Set xRng = Application.InputBox("please select the data range", "Kutools for Excel", xTxt, , , , , 8)
    If xRng Is Nothing Then Exit Sub
    xLastRow = xRng.Columns(1).Rows.Count + 1
    For i = 2 To xRng.Columns.Count
        Range(xRng.Cells(1, i), xRng.Cells(xRng.Columns(i).Rows.Count, i)).Cut
        ActiveSheet.Paste Destination:=xRng.Cells(xLastRow, 1)
        xLastRow = xLastRow + xRng.Columns(i).Rows.Count
    Next
End Sub

3. Luego presiona la tecla F5 para ejecutar este código, y aparecerá un cuadro de diálogo que te recordará seleccionar el rango de datos que deseas combinar en una sola columna, como se muestra en la captura de pantalla:

4. Luego haz clic en el botón Aceptar, y las columnas seleccionadas se habrán fusionado en una sola columna, como se muestra en las siguientes capturas de pantalla:

Consejos: Después de ejecutar este VBA, los datos originales del rango se eliminarán, es mejor que los copies y los guardes en otra ubicación primero.

Combinar múltiples columnas en una lista con Kutools para Excel

Si has instalado Kutools para Excel, su utilidad Transformar Rango puede ayudarte a combinar múltiples columnas en una sola columna o fila.

Después de instalar Kutools para Excel, sigue estos pasos:

1. Selecciona los datos de las columnas que deseas combinar en una lista.

2. Luego haz clic en Kutools > Rango > Transformar Rango, ver captura de pantalla:

3. En el cuadro de diálogo Transformar Rango, selecciona la opción Rango a columna única y haz clic en el botón Aceptar, ver captura de pantalla:

4. En el siguiente cuadro emergente de Transformar Rango, haz clic en una celda donde deseas obtener el resultado, ver captura de pantalla:

5. Luego haz clic en el botón Aceptar, tus columnas seleccionadas se habrán combinado en una sola columna en la ubicación especificada que deseabas. Ver captura de pantalla:

Descarga y prueba gratuita ¡Kutools para Excel Ahora!

Demostración: Combinar múltiples columnas en una lista con Kutools para Excel